[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