(vc-find-cvs-master): Added missing `throw' for

the case when TIMESTAMP is arbitrary text.

(vc-find-cvs-master): Added missing `throw' for
the case when TIMESTAMP is arbitrary text.
274c59c9 · Karl Heuer · 5d2e9438 · 274c59c9
Commit 274c59c9 authored Sep 30, 1997 by Karl Heuer
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

lisp/vc-hooks.el lisp/vc-hooks.el +2 -1

No files found.
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -850,7 +850,8 @@ For CVS, the full name of CVS/Entries is returned."
 		;; We found it.  Store away version number now that we 
 		;; are anyhow so close to finding it.
 		(vc-file-setprop file 'vc-workfile-version (match-string 1))
-                (vc-file-setprop file 'vc-checkout-time 0))
+		(vc-file-setprop file 'vc-checkout-time 0)
+		(throw 'found (cons (concat dirname "CVS/Entries") 'CVS)))
 	       (t nil)))
 	  (kill-buffer buffer)))))