mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 18:40:39 -08:00
Code Issues Projects Releases Wiki Activity

(vc-hg-annotate-command): Allow white space before version number.

Browse source
This commit is contained in:
Dan Nicolaescu 2008-05-17 15:16:50 +00:00
parent 62867b112d
commit 9f94054523
2 changed files with 7 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/vc-hg.el
View file

@ -311,8 +311,8 @@ Optional arg VERSION is a version to annotate from."
(vc-hg-command buffer 0 file "annotate" "-d" "-n" (if version (concat "-r" version)))
(with-current-buffer buffer
(goto-char (point-min))
(re-search-forward "^[0-9]")
(delete-region (point-min) (1- (point)))))
(re-search-forward "^[ \t]*[0-9]")
(delete-region (point-min) (match-beginning 0))))
;; The format for one line output by "hg annotate -d -n" looks like this: