[Bps-public-commit] r13867 - Prophet/trunk/t

jesse at bestpractical.com jesse at bestpractical.com
Tue Jul 8 12:36:50 EDT 2008


Author: jesse
Date: Tue Jul  8 12:36:49 2008
New Revision: 13867

Modified:
   Prophet/trunk/t/simple-push.t

Log:
small test cleanups

Modified: Prophet/trunk/t/simple-push.t
==============================================================================
--- Prophet/trunk/t/simple-push.t	(original)
+++ Prophet/trunk/t/simple-push.t	Tue Jul  8 12:36:49 2008
@@ -34,7 +34,6 @@
 );
 };
 
-my $changesets = $bob->new_changesets_for($alice);
 
 my $openbug = '';
 as_bob {
@@ -46,7 +45,7 @@
 
 };
 
-my $changesets =   [ map { $_->as_hash } grep { $_->has_changes }  @$changesets ];
+my $changesets =   [ map { $_->as_hash } grep { $_->has_changes }  @{$bob->new_changesets_for($alice)}];
 my $seq = delete $changesets->[0]->{'sequence_no'};
 my $orig_seq = delete $changesets->[0]->{'original_sequence_no'};
 is($seq, $orig_seq);
@@ -106,9 +105,7 @@
 
 my @changes = map { $_->as_hash } grep { $_->has_changes } @$changesets;
 
-my $seq = delete @changes[0]->{'sequence_no'};
-my $orig_seq = delete @changes[0]->{'original_sequence_no'};
-is($seq, $orig_seq);
+is( delete $changes[0]->{'sequence_no'}, delete $changes[0]->{'original_sequence_no'});
 
 is_deeply(
     \@changes,



More information about the Bps-public-commit mailing list