diff options
| author | Jelmer Vernooij <jelmer@samba.org> | 2009-06-05 18:50:45 +0200 |
|---|---|---|
| committer | Jelmer Vernooij <jelmer@samba.org> | 2009-06-11 20:00:00 +0200 |
| commit | 2ffffcb220082a4adf31dd15cecb30f8b610614c (patch) | |
| tree | 3c6f6b0c336532faaac3ab906db1a781100f48e1 /selftest | |
| parent | 9faaffa87bbc4f427cabd5debbbab77582c1343c (diff) | |
| download | samba-2ffffcb220082a4adf31dd15cecb30f8b610614c.tar.gz samba-2ffffcb220082a4adf31dd15cecb30f8b610614c.tar.bz2 samba-2ffffcb220082a4adf31dd15cecb30f8b610614c.zip | |
subunit: Sort diff output.
Diffstat (limited to 'selftest')
| -rw-r--r-- | selftest/Subunit/Diff.pm | 2 | ||||
| -rwxr-xr-x | selftest/diff-subunit.pl | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/selftest/Subunit/Diff.pm b/selftest/Subunit/Diff.pm index 5c9e4f0de0..de251b37b3 100644 --- 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 index 280021ccc4..fc80c371f8 100755 --- a/selftest/diff-subunit.pl +++ b/selftest/diff-subunit.pl @@ -14,7 +14,7 @@ my $new = Subunit::Diff::from_file($ARGV[1]); 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]; } |