mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00
Code Issues Releases Activity

(vc-git-annotate-extract-revision-at-line):

Browse Source 
Allow "^" in a version name.
This commit is contained in:
Dan Nicolaescu 2008-03-22 17:21:48 +00:00
parent 3281a821f7
commit dd3ffb9a38
2 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/ChangeLog
View File

@ -1,5 +1,8 @@
2008-03-22 Dan Nicolaescu <dann@ics.uci.edu>
* vc-git.el (vc-git-annotate-extract-revision-at-line):
Allow "^" in a version name.
* vc-mtn.el (vc-mtn-state): Support the added state.
2008-03-22 Carsten Dominik <dominik@science.uva.nl>

2
lisp/vc-git.el
View File

@ -400,7 +400,7 @@ or BRANCH^ (where \"^\" can be repeated)."
(defun vc-git-annotate-extract-revision-at-line ()
(save-excursion
(move-beginning-of-line 1)
(and (looking-at "[0-9a-f]+")
(and (looking-at "[0-9a-f^][0-9a-f]+")
(buffer-substring-no-properties (match-beginning 0) (match-end 0)))))
;;; SNAPSHOT SYSTEM