changeset 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 aaf6fe5d0a54
children 936d4a988148
files lisp/vc.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
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)