renamed
Robert Sedlacek [Thu, 24 Sep 2015 00:25:45 +0000 (00:25 +0000)]
Makefile.PL
lib/DBIx/Class/RowCountStatistics.pm [moved from lib/CtrlO/DBIC/Cursor/RowCountStatistics.pm with 83% similarity]
lib/DBIx/Class/RowCountStatistics/Storage.pm [moved from lib/CtrlO/DBIC/Cursor/RowCountStatistics/Storage.pm with 91% similarity]
t/basic.t

index 1c86e27..96cf88d 100644 (file)
@@ -18,7 +18,7 @@ my %_req = (
 );
 
 WriteMakefile(
-  NAME => 'CtrlO::DBIC::Cursor::RowCountStatistics',
+  NAME => 'DBIx::Class::RowCountStatistics',
   VERSION_FROM => 'lib/CtrlO/DBIC/Cursor/RowCountStatistics.pm',
   LICENSE => undef,
   TEST_REQUIRES => \%_test_req,
similarity index 83%
rename from lib/CtrlO/DBIC/Cursor/RowCountStatistics.pm
rename to lib/DBIx/Class/RowCountStatistics.pm
index 99d4170..75060c1 100644 (file)
@@ -1,10 +1,10 @@
 use strict;
 use warnings;
 
-package CtrlO::DBIC::Cursor::RowCountStatistics;
+package DBIx::Class::RowCountStatistics;
 use Class::Method::Modifiers;
 
-use CtrlO::DBIC::Cursor::RowCountStatistics::Storage;
+use DBIx::Class::RowCountStatistics::Storage;
 
 use parent 'DBIx::Class::Storage::DBI::Cursor';
 
@@ -19,7 +19,7 @@ around new => sub {
 
     return $orig->(
         $class,
-        CtrlO::DBIC::Cursor::RowCountStatistics::Storage->new($storage),
+        DBIx::Class::RowCountStatistics::Storage->new($storage),
         @rest,
     );
 };
@@ -63,14 +63,14 @@ sub _emit_query_complete {
 
 =head1 NAME
 
-CtrlO::DBIC::Cursor::RowCountStatistics - Provide row-count statistics
+DBIx::Class::RowCountStatistics - Provide row-count statistics
 
 =head1 SYNOPSIS
 
     my $schema = Schema->connect(
         $dsn, $username, $password,
         {},
-        { cursor_class => 'CtrlO::DBIC::Cursor::RowCountStatistics' },
+        { cursor_class => 'DBIx::Class::RowCountStatistics' },
     );
 
 =head1 DESCRIPTION
@@ -106,7 +106,7 @@ None yet.
 
 =head1 COPYRIGHT
 
-Copyright (c) 2015 the CtrlO::DBIC::Cursor::RowCountStatistics L</AUTHOR> and L</CONTRIBUTORS>
+Copyright (c) 2015 the DBIx::Class::RowCountStatistics L</AUTHOR> and L</CONTRIBUTORS>
 as listed above.
 
 =cut
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-package CtrlO::DBIC::Cursor::RowCountStatistics::Storage;
+package DBIx::Class::RowCountStatistics::Storage;
 use Class::Method::Modifiers;
 
 sub new {
index 2ebd1d5..b302a3d 100644 (file)
--- a/t/basic.t
+++ b/t/basic.t
@@ -12,7 +12,7 @@ plan skip_all => 'requires DBD::SQLite'
     unless eval { require DBD::SQLite };
 
 use TestSchema;
-use CtrlO::DBIC::Cursor::RowCountStatistics;
+use DBIx::Class::RowCountStatistics;
 
 our @_COMPLETE;
 
@@ -35,7 +35,7 @@ my $schema = TestSchema->connect(
     undef, undef,
     {},
     {
-        cursor_class => 'CtrlO::DBIC::Cursor::RowCountStatistics',
+        cursor_class => 'DBIx::Class::RowCountStatistics',
     }
 );
 $schema->deploy();
@@ -44,7 +44,7 @@ $schema->storage->debug(1);
 
 ok $schema, 'schema created';
 is $schema->storage->cursor_class,
-    'CtrlO::DBIC::Cursor::RowCountStatistics',
+    'DBIx::Class::RowCountStatistics',
     'cursor_class set';
 
 my $rs = $schema->resultset('Test');
@@ -54,7 +54,7 @@ subtest 'count with ->next' => sub {
     $rs->create({ id => $_ }) for 1..10;
     do {
         my $rows = $rs->search_rs;
-        is ref($rows->cursor), 'CtrlO::DBIC::Cursor::RowCountStatistics',
+        is ref($rows->cursor), 'DBIx::Class::RowCountStatistics',
             'resultset cursor';
         1 while $rows->next;
     };
@@ -70,7 +70,7 @@ subtest 'count with ->all' => sub {
     $rs->create({ id => $_ }) for 1..10;
     do {
         my $rows = $rs->search_rs;
-        is ref($rows->cursor), 'CtrlO::DBIC::Cursor::RowCountStatistics',
+        is ref($rows->cursor), 'DBIx::Class::RowCountStatistics',
             'resultset cursor';
         my @all = $rows->all;
     };