# HG changeset patch # User Karl Heuer # Date 875604815 0 # Node ID 173f2683e3c4adc1bbc2ad6f3a6a46c26ade3ded # Parent ba88cbeab176ebc8fec7e2a5adc86b672b53bb29 (vc-find-cvs-master): Added missing `throw' for the case when TIMESTAMP is arbitrary text. diff -r ba88cbeab176 -r 173f2683e3c4 lisp/vc-hooks.el --- 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)))))