Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
9f940545
Commit
9f940545
authored
May 17, 2008
by
Dan Nicolaescu
Browse files
(vc-hg-annotate-command): Allow white space before version number.
parent
62867b11
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
7 additions
and
2 deletions
+7
-2
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/vc-hg.el
lisp/vc-hg.el
+2
-2
No files found.
lisp/ChangeLog
View file @
9f940545
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 "."
lisp/vc-hg.el
View file @
9f940545
...
...
@@ -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:
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment