X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F93storage_replication.t;h=d03f5c6d3a3e53dcb2e8e91cb83740727d217dac;hb=bbafcf262b74716a37f4265512ba5c1ecd92e15b;hp=a2a130daa9bdcd29a90a7cb8475473cf0a28766f;hpb=2ce6e9a68d68fa86e3b28df61496e85c996b2c1a;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/93storage_replication.t b/t/93storage_replication.t
index a2a130d..d03f5c6 100644
--- a/t/93storage_replication.t
+++ b/t/93storage_replication.t
@@ -9,7 +9,7 @@ BEGIN {
     eval "use Moose; use Test::Moose";
     plan $@
         ? ( skip_all => 'needs Moose for testing' )
-        : ( tests => 77 );
+        : ( tests => 80 );
 }
 
 use_ok 'DBIx::Class::Storage::DBI::Replicated::Pool';
@@ -569,6 +569,20 @@ ok $replicated->schema->resultset('Artist')->find(1)
        => 'Got expected single result from transaction';	  
 }     
 
+## Private attribute tests
+
+{
+	ok my $artist_rs = $replicated->schema->resultset('Artist')
+        => 'got artist resultset';
+	   
+	## Turn on Reliable Storage
+	ok my $reliable_artist_rs = $artist_rs->search(undef, {execute_reliably=>1})
+        => 'Created a resultset using reliable storage';
+	   
+    ok my $artist = $reliable_artist_rs->find(2) 
+        => 'got an artist to test see the attributes';
+}
+
 ## Delete the old database files
 $replicated->cleanup;