From 07ebab66581c7ce586d976ffffc9a429540df1ab Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Tue, 14 Oct 2008 07:05:07 +0000 Subject: [PATCH] * vc-git.el (vc-git-show-log-entry): Include the revision in the search string. --- lisp/ChangeLog | 5 +++++ lisp/vc-git.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1f9e909b1aa..21e5953779f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2008-10-14 Eric Hanchrow (tiny change) + + * vc-git.el (vc-git-show-log-entry): Include the revision in the + search string. + 2008-10-14 Michael Albinus * net/tramp.el (tramp-process-one-action): Embed regexp in diff --git a/lisp/vc-git.el b/lisp/vc-git.el index 90d8ee1289a..aa4b1bb6f16 100644 --- a/lisp/vc-git.el +++ b/lisp/vc-git.el @@ -492,7 +492,7 @@ REVISION may have the form BRANCH, BRANCH~N, or BRANCH^ (where \"^\" can be repeated)." (goto-char (point-min)) (when revision - (search-forward "\ncommit" nil t + (search-forward (format "\ncommit %s" revision) nil t (cond ((string-match "~\\([0-9]\\)$" revision) (1+ (string-to-number (match-string 1 revision)))) ((string-match "\\^+$" revision) -- 2.39.5