# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 803326306 0
# Node ID ba3d2da14bcafd9a0ccf6ca8a6b3f87b473816f5
# Parent  b33cc6583bb99a9024a056c022bc136b224f4dc5
(vc-lookup-triple): changed the code that used to call
vc-master-info, which no longer exists. Adapted to the new
parameter format of vc-parse-buffer.

diff -r b33cc6583bb9 -r ba3d2da14bca lisp/vc.el
--- a/lisp/vc.el	Fri Jun 16 18:04:47 1995 +0000
+++ b/lisp/vc.el	Fri Jun 16 18:11:46 1995 +0000
@@ -1235,10 +1235,16 @@
 	   (and (>= firstchar ?0) (<= firstchar ?9)))
 	 name)
 	(t
-	 (car (vc-master-info
-	       (concat (vc-backend-subdirectory-name file) "/" vc-name-assoc-file)
-	       (list (concat name "\t:\t" file "\t\\(.+\\)"))))
-	 )))
+	 (save-excursion
+	   (set-buffer (get-buffer-create "*vc-info*"))
+	   (vc-insert-file (concat 
+			    (vc-backend-subdirectory-name file) 
+			    "/" vc-name-assoc-file))
+	   (prog1
+	       (car (vc-parse-buffer
+		     (list (list (concat name "\t:\t" file "\t\\(.+\\)") 1))))
+	     (kill-buffer "*vc-info*"))))
+	 ))
 
 ;; Named-configuration entry points