changeset 20008:173f2683e3c4

(vc-find-cvs-master): Added missing `throw' for the case when TIMESTAMP is arbitrary text.
author Karl Heuer <kwzh@gnu.org>
date Tue, 30 Sep 1997 07:33:35 +0000
parents ba88cbeab176
children 09bc233eb018
files lisp/vc-hooks.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc-hooks.el	Tue Sep 30 07:29:12 1997 +0000
+++ b/lisp/vc-hooks.el	Tue Sep 30 07:33:35 1997 +0000
@@ -850,7 +850,8 @@
 		;; 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)))))