From: Robert Sedlacek Date: Mon, 19 Oct 2015 02:54:16 +0000 (+0000) Subject: added dev comments about per-cursor wrapper X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=HEAD;p=dbsrgits%2FDBIx-Class-RowCountStatistics.git added dev comments about per-cursor wrapper --- diff --git a/lib/DBIx/Class/RowCountStatistics.pm b/lib/DBIx/Class/RowCountStatistics.pm index e72e94b..48ebc0a 100644 --- a/lib/DBIx/Class/RowCountStatistics.pm +++ b/lib/DBIx/Class/RowCountStatistics.pm @@ -12,7 +12,7 @@ our $VERSION = '0.000001'; # 0.0.1 $VERSION = eval $VERSION; # Wrap the original ::Storage::DBI we received so we can extract data -# from it's usage by the Cursor. +# from it's usage by the Cursor. This wrapping is per-Cursor. around new => sub { my $orig = shift; my ($class, $storage, @rest) = @_; diff --git a/lib/DBIx/Class/RowCountStatistics/Storage.pm b/lib/DBIx/Class/RowCountStatistics/Storage.pm index a38fb9f..10f3c20 100644 --- a/lib/DBIx/Class/RowCountStatistics/Storage.pm +++ b/lib/DBIx/Class/RowCountStatistics/Storage.pm @@ -1,6 +1,7 @@ use strict; use warnings; +# per-Cursor wrapper object to cache and access SQL later package DBIx::Class::RowCountStatistics::Storage; use Class::Method::Modifiers;