(cvs-revert-if-needed): Fix copy&paste typo.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 300ae8b..1b3c8eb 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-11-20  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * pcvs.el (cvs-revert-if-needed): Fix copy&paste typo.
+
 2007-11-20  Glenn Morris  <rgm@gnu.org>
 
        * emacs-lisp/check-declare.el (check-declare-verify): Tweak regexp

diff --git a/lisp/pcvs.el b/lisp/pcvs.el
index fea7c80..53bed60 100644 (file)
--- a/lisp/pcvs.el
+++ b/lisp/pcvs.el
@@ -2293,7 +2293,7 @@ this file, or a list of arguments to send to the program."
           (buffer (find-buffer-visiting file)))
       ;; For a revert to happen the user must be editing the file...
       (unless (or (null buffer)
-                 (eq (cvs-fileinfo->type fileinfo) '(MESSAGE UNKNOWN))
+                 (memq (cvs-fileinfo->type fileinfo) '(MESSAGE UNKNOWN))
                  ;; FIXME: check whether revert is really needed.
                  ;; `(verify-visited-file-modtime buffer)' doesn't cut it
                  ;; because it only looks at the time stamp (it ignores