Mercurial > emacs
diff lisp/vc.el @ 2604:3a56b8caf6c9
(vc-revert-buffer1): Ignore non-marker elts of compilation-error-list.
author | Roland McGrath <roland@gnu.org> |
---|---|
date | Wed, 28 Apr 1993 22:48:52 +0000 |
parents | a66f7ed76416 |
children | f9f844a39a29 |
line wrap: on
line diff
--- a/lisp/vc.el Wed Apr 28 22:44:29 1993 +0000 +++ b/lisp/vc.el Wed Apr 28 22:48:52 1993 +0000 @@ -282,10 +282,11 @@ (buffer-error-marked-p nil)) (while (and errors (not buffer-error-marked-p)) - (if (eq buffer - (marker-buffer - (car (cdr (car errors))))) - (setq buffer-error-marked-p t)) + (and (markerp (car (cdr (car errors)))) + (eq buffer + (marker-buffer + (car (cdr (car errors))))) + (setq buffer-error-marked-p t)) (setq errors (cdr errors))) (if buffer-error-marked-p buffer))) (buffer-list)))))))