1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 18:40:39 -08:00

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

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

View file

@ -1,3 +1,8 @@
2008-05-17 David Hull <david@snap.com> (tiny change)
* vc-hg.el (vc-hg-annotate-command): Allow white space before
version number.
2008-05-12 Simon Marshall <simon@gnu.org>
* obsolete/fast-lock.el (fast-lock-cache-directories): Remove "."

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: