From: Paul Eggert <eggert@twinsun.com>
Date: Fri, 18 Feb 1994 02:51:33 +0000 (+0000)
Subject: (vc-lookup-triple): Yield nil, not "", if NAME is nil.
X-Git-Tag: emacs-19.34~9863
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=47ca02a62cf7ba47156410b785675febe0a1e18f;p=emacs.git

(vc-lookup-triple): Yield nil, not "", if NAME is nil.
Otherwise vc-revert-buffer fails with SCCS.
---

diff --git a/lisp/vc.el b/lisp/vc.el
index 896e126d178..ed2040a2609 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -1038,7 +1038,7 @@ on a buffer attached to the file named in the current Dired buffer line."
 (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)