[Dbix-class] Fix Warn "Use of uninitialized value in numeric eq (==) at .../DBIx/Class/Storage/DBI.pm line 709"

[Marc Mims]

* dreel at bk.ru <dreel at bk.ru> [071104 14:20]:
> On my win32 DBIC always warn at startup with this:
> Use of uninitialized value in numeric eq (==) at C:/usr/local/site/lib/DBIx/Class/Storage/DBI.pm.
> 
> It's strange thing but sub don't take PID at first step that's why I
> fix it with additional the check:
> 
> 704:# handle pid changes correctly
> 705:#  NOTE: assumes $self->_dbh is a valid $dbh
> 706: sub _verify_pid {
> 707:   my ($self) = @_;
> 708:
> 709:   return if $self->_conn_pid && $self->_conn_pid == $$; # orig: return if $self->_conn_pid == $$;
> 710:
> 711:   $self->_dbh->{InactiveDestroy} = 1;
> 712:   $self->_dbh(undef);
> 713:   $self->{_dbh_gen}++;
> 714:
> 715:   return;
> 716: }
> 
> DBIC 0.8007

It's been fixed in trunk.  Should be in the next CPAN release.

	-Marc