diff options
| author | Dan Nicolaescu | 2008-03-22 17:21:48 +0000 |
|---|---|---|
| committer | Dan Nicolaescu | 2008-03-22 17:21:48 +0000 |
| commit | dd3ffb9a381f5fb3ef61988d0c0733b33c059c8f (patch) | |
| tree | a3c4b527607106a6d4cda92d94d1c7972cbd495c /lisp/vc-git.el | |
| parent | 3281a821f771b2c74fe880f24cc38ce0d25e4d58 (diff) | |
| download | emacs-dd3ffb9a381f5fb3ef61988d0c0733b33c059c8f.tar.gz emacs-dd3ffb9a381f5fb3ef61988d0c0733b33c059c8f.zip | |
(vc-git-annotate-extract-revision-at-line):
Allow "^" in a version name.
Diffstat (limited to 'lisp/vc-git.el')
| -rw-r--r-- | lisp/vc-git.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/vc-git.el b/lisp/vc-git.el index 8bbb16a62a0..36d17ad4a75 100644 --- a/lisp/vc-git.el +++ b/lisp/vc-git.el | |||
| @@ -400,7 +400,7 @@ or BRANCH^ (where \"^\" can be repeated)." | |||
| 400 | (defun vc-git-annotate-extract-revision-at-line () | 400 | (defun vc-git-annotate-extract-revision-at-line () |
| 401 | (save-excursion | 401 | (save-excursion |
| 402 | (move-beginning-of-line 1) | 402 | (move-beginning-of-line 1) |
| 403 | (and (looking-at "[0-9a-f]+") | 403 | (and (looking-at "[0-9a-f^][0-9a-f]+") |
| 404 | (buffer-substring-no-properties (match-beginning 0) (match-end 0))))) | 404 | (buffer-substring-no-properties (match-beginning 0) (match-end 0))))) |
| 405 | 405 | ||
| 406 | ;;; SNAPSHOT SYSTEM | 406 | ;;; SNAPSHOT SYSTEM |