[Bps-public-commit] r11514 - in SVN-PropDB: t
clkao at bestpractical.com
clkao at bestpractical.com
Fri Apr 4 20:37:42 EDT 2008
Author: clkao
Date: Fri Apr 4 20:37:41 2008
New Revision: 11514
Modified:
SVN-PropDB/lib/Prophet/Collection.pm
SVN-PropDB/t/sd-rt.t
Log:
sort collection order by uuid for now.
Modified: SVN-PropDB/lib/Prophet/Collection.pm
==============================================================================
--- SVN-PropDB/lib/Prophet/Collection.pm (original)
+++ SVN-PropDB/lib/Prophet/Collection.pm Fri Apr 4 20:37:41 2008
@@ -61,7 +61,7 @@
# run coderef against each item;
# if it matches, add it to _items
- foreach my $key ( keys %$nodes ) {
+ foreach my $key ( sort keys %$nodes ) {
my $record = $self->record_class->new( { handle => $self->handle, type => $self->type } );
$record->load( uuid => $key );
if ( $coderef->($record) ) {
Modified: SVN-PropDB/t/sd-rt.t
==============================================================================
--- SVN-PropDB/t/sd-rt.t (original)
+++ SVN-PropDB/t/sd-rt.t Fri Apr 4 20:37:41 2008
@@ -65,7 +65,7 @@
diag $yatta_uuid;
run_output_matches('sd', ['ticket', '--list', '--regex', '.'],
- [
+ [ sort
"$yatta_uuid YATTA new",
"$flyman_uuid Fly Man open",
]);
@@ -83,7 +83,7 @@
run_output_matches('sd', ['ticket', '--list', '--regex', '.'],
- [
+ [ sort
"$yatta_uuid YATTA new",
"$flyman_uuid Fly Man open",
]);
@@ -94,22 +94,24 @@
status => 'stalled',
)->store();
+($ret, $out, $err) = run_script('sd', ['pull', $sd_rt_url]);
+
run_output_matches('sd', ['ticket', '--list', '--regex', '.'],
- [
+ [ sort
"$yatta_uuid YATTA open",
"$flyman_uuid Fly Man stalled",
]);
RT::Client::REST::Ticket->new(
rt => $rt,
- id => @tix[0],
+ id => $tix[0],
status => 'open',
)->store();
($ret, $out, $err) = run_script('sd', ['pull', $sd_rt_url]);
run_output_matches('sd', ['ticket', '--list', '--regex', '.'],
- [
+ [ sort
"$yatta_uuid YATTA open",
"$flyman_uuid Fly Man stalled",
]);
More information about the Bps-public-commit
mailing list