From: Benoit Sigoure <tsuna@lrde.epita.fr>
Date: Sat, 3 Nov 2007 18:53:34 +0000 (+0100)
Subject: git-svn: sort the options in the --help message.
X-Git-Tag: v1.5.4-rc0~281
X-Git-Url: https://git.lorimer.id.au/gitweb.git/diff_plain/aa807bc2663d69d6adb1d823231ba4b6d30d4860

git-svn: sort the options in the --help message.

"git svn <cmd> --help" gave options in the order they were found in a
Perl hash, which meant "randomly" to humans.

Signed-off-by: Benoit Sigoure <tsuna@lrde.epita.fr>
Acked-by: Eric Wong <normalperson@yhbt.net>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
---

diff --git a/git-svn.perl b/git-svn.perl
index 22bb47b34d..4900f57f18 100755
--- a/git-svn.perl
+++ b/git-svn.perl
@@ -252,7 +252,7 @@ sub usage {
 		next if $cmd && $cmd ne $_;
 		next if /^multi-/; # don't show deprecated commands
 		print $fd '  ',pack('A17',$_),$cmd{$_}->[1],"\n";
-		foreach (keys %{$cmd{$_}->[2]}) {
+		foreach (sort keys %{$cmd{$_}->[2]}) {
 			# mixed-case options are for .git/config only
 			next if /[A-Z]/ && /^[a-z]+$/i;
 			# prints out arguments as they should be passed: