Parent Directory | Revision Log | Patch
revision 176 by dpavlin, Mon Jun 16 16:48:16 2008 UTC | revision 177 by dpavlin, Mon Jun 16 19:05:05 2008 UTC | |
---|---|---|
# | Line 35 our $instance_dbh; | Line 35 our $instance_dbh; |
35 | sub dbh { | sub dbh { |
36 | my $self = shift; | my $self = shift; |
37 | ||
38 | my $instance = shift || $self->instance || confess "no instance"; | my $instance = shift || ref($self) && $self->instance || confess "no instance"; |
39 | ||
40 | return $instance_dbh->{$instance} if $instance_dbh->{$instance}; | return $instance_dbh->{$instance} if $instance_dbh->{$instance}; |
41 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |