X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest%2FStats.pm;h=5a4544fe539c072fafb16d3a54c2d7e475598c7b;hb=818ec409baa3cd8a520bb6164a83e9a90fb84674;hp=97fbc556ce9caf09f0a613d06f1cec632f345dd4;hpb=adb3554a3f72bf9c9b267c5eb84a8401da64bf37;p=dbsrgits%2FDBIx-Class.git diff --git a/t/lib/DBICTest/Stats.pm b/t/lib/DBICTest/Stats.pm index 97fbc55..5a4544f 100644 --- a/t/lib/DBICTest/Stats.pm +++ b/t/lib/DBICTest/Stats.pm @@ -32,7 +32,7 @@ sub svp_begin { return $self->{'SVP_BEGIN'}; } -sub svn_release { +sub svp_release { my ($self, $name) = @_; $self->{'SVP_RELEASE'}++; @@ -60,4 +60,4 @@ sub query_end { return $self->{'QUERY_START'}; } -1; \ No newline at end of file +1;