# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 737351865 0
# Node ID ea8a7ab72d14109ae2889ff5c55baa652a6d1f3e
# Parent  8ab8f28b78d18ae6ed3b867e8b103e857156ffc9
(vc-revert-buffer1): Don't assume that compilation-error-list
is a list; it might be t.

diff -r 8ab8f28b78d1 -r ea8a7ab72d14 lisp/vc.el
--- a/lisp/vc.el	Thu May 13 20:06:18 1993 +0000
+++ b/lisp/vc.el	Fri May 14 03:57:45 1993 +0000
@@ -289,7 +289,7 @@
 						   compilation-old-error-list
 						   compilation-error-list))
 					  (buffer-error-marked-p nil))
-				      (while (and errors
+				      (while (and (consp errors)
 						  (not buffer-error-marked-p))
 					(and (markerp (cdr (car errors)))
 					     (eq buffer