[Bast-commits] r4909 - in DBIx-Class/0.08/trunk: lib/DBIx/Class/Manual t/examples/Schema

ribasushi at dev.catalyst.perl.org ribasushi at dev.catalyst.perl.org
Wed Oct 8 10:46:18 BST 2008


Author: ribasushi
Date: 2008-10-08 10:46:18 +0100 (Wed, 08 Oct 2008)
New Revision: 4909

Modified:
   DBIx-Class/0.08/trunk/lib/DBIx/Class/Manual/Example.pod
   DBIx-Class/0.08/trunk/t/examples/Schema/testdb.pl
Log:
Minor documentation patch by Flavio Poletti - remove useless prefetch from examples

Modified: DBIx-Class/0.08/trunk/lib/DBIx/Class/Manual/Example.pod
===================================================================
--- DBIx-Class/0.08/trunk/lib/DBIx/Class/Manual/Example.pod	2008-10-07 22:17:14 UTC (rev 4908)
+++ DBIx-Class/0.08/trunk/lib/DBIx/Class/Manual/Example.pod	2008-10-08 09:46:18 UTC (rev 4909)
@@ -220,7 +220,6 @@
       },
       {
         join     => [qw/ cd /],
-        prefetch => [qw/ cd /]
       }
     );
     while (my $track = $rs->next) {
@@ -273,7 +272,6 @@
       },
       {
         join     => [qw/ artist /],
-        prefetch => [qw/ artist /]
       }
     );
     while (my $cd = $rs->next) {

Modified: DBIx-Class/0.08/trunk/t/examples/Schema/testdb.pl
===================================================================
--- DBIx-Class/0.08/trunk/t/examples/Schema/testdb.pl	2008-10-07 22:17:14 UTC (rev 4908)
+++ DBIx-Class/0.08/trunk/t/examples/Schema/testdb.pl	2008-10-08 09:46:18 UTC (rev 4909)
@@ -26,7 +26,6 @@
         },
         {
             join     => [qw/ cd /],
-            prefetch => [qw/ cd /]
         }
     );
     while (my $track = $rs->next) {
@@ -79,7 +78,6 @@
         },
         {
             join     => [qw/ artist /],
-            prefetch => [qw/ artist /]
         }
     );
     while (my $cd = $rs->next) {




More information about the Bast-commits mailing list