Mercurial > emacs
diff lisp/vc.el @ 5989:0b529dfd88c3
(vc-lookup-triple): Yield nil, not "", if NAME is nil.
Otherwise vc-revert-buffer fails with SCCS.
author | Paul Eggert <eggert@twinsun.com> |
---|---|
date | Fri, 18 Feb 1994 02:51:33 +0000 |
parents | 49029e28ed2c |
children | 36e1485fa93b |
line wrap: on
line diff
--- a/lisp/vc.el Fri Feb 18 01:12:10 1994 +0000 +++ b/lisp/vc.el Fri Feb 18 02:51:33 1994 +0000 @@ -1038,7 +1038,7 @@ (defun vc-lookup-triple (file name) ;; Return the numeric version corresponding to a named snapshot of file ;; If name is nil or a version number string it's just passed through - (cond ((null name) "") + (cond ((null name) name) ((let ((firstchar (aref name 0))) (and (>= firstchar ?0) (<= firstchar ?9))) name)