[Bast-commits] r7538 - DBIx-Class/0.08/branches/pg_unqualified_schema/t

[rbuels at dev.catalyst.perl.org]

Author: rbuels
Date: 2009-09-03 22:41:32 +0000 (Thu, 03 Sep 2009)
New Revision: 7538

Modified:
   DBIx-Class/0.08/branches/pg_unqualified_schema/t/72pg.t
Log:
more work on extended set of Pg auto-pk tests

Modified: DBIx-Class/0.08/branches/pg_unqualified_schema/t/72pg.t
===================================================================
--- DBIx-Class/0.08/branches/pg_unqualified_schema/t/72pg.t	2009-09-03 22:41:26 UTC (rev 7537)
+++ DBIx-Class/0.08/branches/pg_unqualified_schema/t/72pg.t	2009-09-03 22:41:32 UTC (rev 7538)
@@ -554,7 +554,7 @@
 
   my $schema_name_actual = $schema_name || $s->storage->dbh_do('_get_pg_search_path')->[0];
 
-  $s->source('ExtAPK')->name($schema_name.'apk');
+  $s->source('ExtAPK')->name($schema_name ? $schema_name.'.apk' : 'apk');
   #< clear sequence name cache
   $s->source('ExtAPK')->column_info($_)->{sequence} = undef
       for @eapk_id_columns;