subunit: Sort diff output.

voidswitch · Jun 11, 2009 · 2ffffcb · 2ffffcb
1 parent 9faaffa
commit 2ffffcb
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/selftest/Subunit/Diff.pm b/selftest/Subunit/Diff.pm
@@ -58,7 +58,7 @@ sub from_file($)
 
 	my $ret = new Subunit::Diff();
 	open(IN, $path) or return;
-	parse_results($ret, $statistics, IN);
+	parse_results($ret, $statistics, *IN);
 	close(IN);
 	return $ret;
 }

diff --git a/selftest/diff-subunit.pl b/selftest/diff-subunit.pl
@@ -14,7 +14,7 @@
 
 my $ret = Subunit::Diff::diff($old, $new);
 
-foreach my $e (keys %$ret) {
+foreach my $e (sort(keys %$ret)) {
 	printf "%s: %s -> %s\n", $e, $ret->{$e}[0], $ret->{$e}[1];
 }