Module: tools Branch: master Commit: e87d936f2129488aa8ba20508c4611e1c87b3cfb URL: http://source.winehq.org/git/?p=tools.git;a=commit;h=e87d936f2129488aa8ba205...
Author: Alexandre Julliard julliard@winehq.org Date: Tue Sep 12 20:07:06 2006 +0200
git-notify: Always exec the main git binary instead of the specific commands.
---
git-notify | 12 +++++++----- 1 files changed, 7 insertions(+), 5 deletions(-)
diff --git a/git-notify b/git-notify index 8301824..228d7a4 100755 --- a/git-notify +++ b/git-notify @@ -153,7 +153,7 @@ sub mail_notification($$$@) # get the default repository name sub get_repos_name() { - my $dir = `git-rev-parse --git-dir`; + my $dir = `git rev-parse --git-dir`; chomp $dir; my $repos = realpath($dir); $repos =~ s/(.*?)((.git/)?.git)$/\1/; @@ -169,10 +169,12 @@ sub get_object_info($) my @log = (); my $do_log = 0;
- my $type = `git-cat-file -t $obj`; + open TYPE, "-|" or exec "git", "cat-file", "-t", $obj or die "cannot run git-cat-file"; + my $type = <TYPE>; chomp $type; + close TYPE;
- open OBJ, "git-cat-file $type $obj |" or die "cannot run git-cat-file"; + open OBJ, "-|" or exec "git", "cat-file", $type, $obj or die "cannot run git-cat-file"; while (<OBJ>) { chomp; @@ -325,7 +327,7 @@ sub send_global_notice($$$) my ($ref, $old_sha1, $new_sha1) = @_; my @notice = ();
- open LIST, "-|" or exec "git-rev-list", "--pretty", "^$old_sha1", "$new_sha1", @exclude_list or die "cannot exec git-rev-list"; + open LIST, "-|" or exec "git", "rev-list", "--pretty", "^$old_sha1", "$new_sha1", @exclude_list or die "cannot exec git-rev-list"; while (<LIST>) { chomp; @@ -351,7 +353,7 @@ if ($ARGV[1] eq '0' x 40) # new ref
my @commits = ();
-open LIST, "-|" or exec "git-rev-list", "^$ARGV[1]", "$ARGV[2]", @exclude_list or die "cannot exec git-rev-list"; +open LIST, "-|" or exec "git", "rev-list", "^$ARGV[1]", "$ARGV[2]", @exclude_list or die "cannot exec git-rev-list"; while (<LIST>) { chomp;