From 47ca02a62cf7ba47156410b785675febe0a1e18f Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Fri, 18 Feb 1994 02:51:33 +0000 Subject: [PATCH] (vc-lookup-triple): Yield nil, not "", if NAME is nil. Otherwise vc-revert-buffer fails with SCCS. --- lisp/vc.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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) -- 2.39.5