Mercurial > emacs
comparison lisp/pcvs.el @ 86246:a01176901861
(cvs-revert-if-needed): Fix copy&paste typo.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 20 Nov 2007 04:04:45 +0000 |
| parents | 8cc694a9ff7e |
| children | 7e4a56acd6da |
comparison
equal
deleted
inserted
replaced
| 86245:26cc264a4964 | 86246:a01176901861 |
|---|---|
| 2291 (dolist (fileinfo fis) | 2291 (dolist (fileinfo fis) |
| 2292 (let* ((file (cvs-fileinfo->full-name fileinfo)) | 2292 (let* ((file (cvs-fileinfo->full-name fileinfo)) |
| 2293 (buffer (find-buffer-visiting file))) | 2293 (buffer (find-buffer-visiting file))) |
| 2294 ;; For a revert to happen the user must be editing the file... | 2294 ;; For a revert to happen the user must be editing the file... |
| 2295 (unless (or (null buffer) | 2295 (unless (or (null buffer) |
| 2296 (eq (cvs-fileinfo->type fileinfo) '(MESSAGE UNKNOWN)) | 2296 (memq (cvs-fileinfo->type fileinfo) '(MESSAGE UNKNOWN)) |
| 2297 ;; FIXME: check whether revert is really needed. | 2297 ;; FIXME: check whether revert is really needed. |
| 2298 ;; `(verify-visited-file-modtime buffer)' doesn't cut it | 2298 ;; `(verify-visited-file-modtime buffer)' doesn't cut it |
| 2299 ;; because it only looks at the time stamp (it ignores | 2299 ;; because it only looks at the time stamp (it ignores |
| 2300 ;; read-write changes) which is not changed by `commit'. | 2300 ;; read-write changes) which is not changed by `commit'. |
| 2301 (buffer-modified-p buffer)) | 2301 (buffer-modified-p buffer)) |