Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-23 21:37:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

(log-view-current-file): Give a more explicit error if

Browse source 
log-view-file-re fails to find a match.
This commit is contained in:
Glenn Morris 2007-09-02 01:50:12 +00:00
parent b0bda2462c
commit 22f4e5c15a
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/log-view.el
View file

@ -214,7 +214,8 @@ The match group number 1 should match the revision number itself.")
(save-excursion
(forward-line 1)
(or (re-search-backward log-view-file-re nil t)
(re-search-forward log-view-file-re))
(re-search-forward log-view-file-re nil t)
(error "Unable to determine the current file")
(let* ((file (match-string 1))
(cvsdir (and (re-search-backward log-view-dir-re nil t)
(match-string 1)))