--- lib/Strix.pm 2008/06/16 16:48:16 174 +++ lib/Strix.pm 2008/06/16 19:05:05 177 @@ -35,7 +35,7 @@ sub dbh { my $self = shift; - my $instance = shift || $self->instance || confess "no instance"; + my $instance = shift || ref($self) && $self->instance || confess "no instance"; return $instance_dbh->{$instance} if $instance_dbh->{$instance};