]> git.eshelyaron.com Git - emacs.git/commitdiff
(vc-find-cvs-master): Added missing `throw' for
authorKarl Heuer <kwzh@gnu.org>
Tue, 30 Sep 1997 07:33:35 +0000 (07:33 +0000)
committerKarl Heuer <kwzh@gnu.org>
Tue, 30 Sep 1997 07:33:35 +0000 (07:33 +0000)
the case when TIMESTAMP is arbitrary text.

lisp/vc-hooks.el

index c1452e63c059046b720659b06537826f7c64e294..ce002a68ed8e7dac34b5d579bab6b30f506d9ba4 100644 (file)
@@ -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)))))