# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 736225756 0
# Node ID e2e5dfa162b41f83b5bae9a3385dc89d1c6f254b
# Parent  3123ece1f2adbf0d5865abe448e7629bd4dc3386
(vc-revert-buffer1): Fix format of compilation-error-list.

diff -r 3123ece1f2ad -r e2e5dfa162b4 lisp/vc.el
--- a/lisp/vc.el	Fri Apr 30 18:52:42 1993 +0000
+++ b/lisp/vc.el	Sat May 01 03:09:16 1993 +0000
@@ -282,10 +282,10 @@
 					  (buffer-error-marked-p nil))
 				      (while (and errors
 						  (not buffer-error-marked-p))
-					(and (markerp (car (cdr (car errors))))
+					(and (markerp (cdr (car errors)))
 					     (eq buffer
 						 (marker-buffer
-						  (car (cdr (car errors)))))
+						  (cdr (car errors))))
 					     (setq buffer-error-marked-p t))
 					(setq errors (cdr errors)))
 				      (if buffer-error-marked-p buffer)))