Andrew's git
/
gitweb.git
/ diff
summary
|
log
|
commit
| diff |
tree
commit
grep
author
committer
pickaxe
?
re
annotate: display usage information if no filename was given
author
Matthias Kestenholz
<matthias@spinlock.ch>
Fri, 28 Apr 2006 08:41:19 +0000
(10:41 +0200)
committer
Junio C Hamano
<junkio@cox.net>
Fri, 28 Apr 2006 21:29:04 +0000
(14:29 -0700)
Signed-off-by: Matthias Kestenholz <matthias@spinlock.ch>
git-annotate.perl
patch
|
blob
|
history
raw
|
patch
|
inline
| side by side (parent:
d0ad165
)
diff --git
a/git-annotate.perl
b/git-annotate.perl
index a7aab2566d67289f4abe57b0d91b9210f4263089..a6a7a482cdcf34e3a1d545c7d5deab599a7c0d2f 100755
(executable)
--- a/
git-annotate.perl
+++ b/
git-annotate.perl
@@
-10,9
+10,10
@@
use strict;
use Getopt::Long;
use POSIX qw(strftime gmtime);
use strict;
use Getopt::Long;
use POSIX qw(strftime gmtime);
+use File::Basename qw(basename dirname);
sub usage() {
sub usage() {
- print STDERR
'
Usage: ${\basename $0} [-s] [-S revs-file] file [ revision ]
+ print STDERR
"
Usage: ${\basename $0} [-s] [-S revs-file] file [ revision ]
-l, --long
Show long rev (Defaults off)
-t, --time
-l, --long
Show long rev (Defaults off)
-t, --time
@@
-23,7
+24,7
@@
()
Use revs from revs-file instead of calling git-rev-list
-h, --help
This message.
Use revs from revs-file instead of calling git-rev-list
-h, --help
This message.
-
'
;
+
"
;
exit(1);
}
exit(1);
}
@@
-35,7
+36,7
@@
()
"help|h" => \$help,
"rename|r" => \$rename,
"rev-file|S=s" => \$rev_file);
"help|h" => \$help,
"rename|r" => \$rename,
"rev-file|S=s" => \$rev_file);
-if (!$rc or $help) {
+if (!$rc or $help
or !@ARGV
) {
usage();
}
usage();
}