[Bps-public-commit] r11597 - in SVN-PropDB: t

clkao at bestpractical.com clkao at bestpractical.com
Sun Apr 6 08:12:55 EDT 2008


Author: clkao
Date: Sun Apr  6 08:12:54 2008
New Revision: 11597

Modified:
   SVN-PropDB/lib/Prophet/Replica.pm
   SVN-PropDB/t/export.t

Log:
misc commnets.


Modified: SVN-PropDB/lib/Prophet/Replica.pm
==============================================================================
--- SVN-PropDB/lib/Prophet/Replica.pm	(original)
+++ SVN-PropDB/lib/Prophet/Replica.pm	Sun Apr  6 08:12:54 2008
@@ -396,7 +396,9 @@
         
 
 =cut    
-        
+
+
+# XXX: this totally wants to get streamy and use a callback so we can integrate while fetching.
 sub fetch_changesets {
     my $self = shift;
     my %args = validate( @_, { after => 1 } );

Modified: SVN-PropDB/t/export.t
==============================================================================
--- SVN-PropDB/t/export.t	(original)
+++ SVN-PropDB/t/export.t	Sun Apr  6 08:12:54 2008
@@ -57,6 +57,7 @@
     use_ok('Prophet::Replica::HTTP');
     my $changesets = Prophet::Replica->new({ url => 'prophet:file://'.$path} )->fetch_changesets( after => 0 );
     is( $#{ $changesets}, 4, "We found a total of 5 changesets");
+    # XXX: compare the changeset structure
     is(lc($changesets->[-1]->{source_uuid}), lc($changesets->[-1]->{original_source_uuid}));
 
 };



More information about the Bps-public-commit mailing list