[PATCH 2/3] specify explicit "--pretty=medium" with `git log/show/whatchanged`
- From
Denis Cheng <crquan@gmail.com>
- Date
- Mar 2, 2008, 09:05 UTC
- Message-ID
- <1204448753-4471-2-git-send-email-crquan@gmail.com>
- In-Reply-To
- <1204448753-4471-1-git-send-email-crquan@gmail.com>
The following patch will introduce a new configuration variable, "format.pretty", from then on the pretty format without specifying "--pretty" might not be the default "--pretty=medium", it depends on the user's config. So all kinds of Shell/Perl/Emacs scripts that needs the default medium pretty format must specify it explicitly.
Signed-off-by: Denis Cheng <crquan@gmail.com> --- contrib/emacs/git.el | 2 +- contrib/hooks/post-receive-email | 2 +- git-cvsserver.perl | 2 +- git-merge.sh | 2 +- 4 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/contrib/emacs/git.el b/contrib/emacs/git.el index c926823..4fa853f 100644 --- a/contrib/emacs/git.el +++ b/contrib/emacs/git.el @@ -1299,7 +1299,7 @@ Return the list of files that haven't been handled." (let (author-name author-email subject date msg) (with-temp-buffer (let ((coding-system (git-get-logoutput-coding-system))) - (git-call-process-env t nil "log" "-1" commit) + (git-call-process-env t nil "log" "-1" "--pretty=medium" commit) (goto-char (point-min)) (when (re-search-forward "^Author: *\\(.*\\) <\\(.*\\)>$" nil t) (setq author-name (match-string 1)) diff --git a/contrib/hooks/post-receive-email b/contrib/hooks/post-receive-email index 77c88eb..62a740c 100644 --- a/contrib/hooks/post-receive-email +++ b/contrib/hooks/post-receive-email @@ -567,7 +567,7 @@ generate_general_email() echo "" if [ "$newrev_type" = "commit" ]; then echo $LOGBEGIN - git show --no-color --root -s $newrev + git show --no-color --root -s --pretty=medium $newrev echo $LOGEND else # What can we do here? The tag marks an object that is not diff --git a/git-cvsserver.perl b/git-cvsserver.perl index afe3d0b..7f632af 100755 --- a/git-cvsserver.perl +++ b/git-cvsserver.perl @@ -2556,7 +2556,7 @@ sub update if ($base) { my @merged; # print "want to log between $base $parent \n"; - open(GITLOG, '-|', 'git-log', "$base..$parent") + open(GITLOG, '-|', 'git-log', '--pretty=medium', "$base..$parent") or die "Cannot call git-log: $!"; my $mergedhash; while (<GITLOG>) { diff --git a/git-merge.sh b/git-merge.sh index 1c123a3..39aa5f5 100755 --- a/git-merge.sh +++ b/git-merge.sh @@ -70,7 +70,7 @@ finish_up_to_date () { squash_message () { echo Squashed commit of the following: echo - git log --no-merges ^"$head" $remoteheads + git log --no-merges --pretty=medium ^"$head" $remoteheads } finish () {
-- 1.5.4.3.368.g2bb0a