changeset 83843:bdd75f65c6cd

(log-view-current-file): Give a more explicit error if log-view-file-re fails to find a match.
author Glenn Morris <rgm@gnu.org>
date Sun, 02 Sep 2007 01:50:12 +0000
parents e7c5a54d8f0d
children 5787ced44842
files lisp/log-view.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/log-view.el	Sun Sep 02 01:49:48 2007 +0000
+++ b/lisp/log-view.el	Sun Sep 02 01:50:12 2007 +0000
@@ -214,7 +214,8 @@
   (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)))