summaryrefslogtreecommitdiff
path: root/lisp/pcvs.el
diff options
context:
space:
mode:
authorSam Steingold <sds@gnu.org>2003-05-09 15:59:02 +0000
committerSam Steingold <sds@gnu.org>2003-05-09 15:59:02 +0000
commit7b33268a39471c028962523cd30da880af5d3ab8 (patch)
treee8c3890c21f9d7755548934870b6dceba16d81dc /lisp/pcvs.el
parent89c52be24c3c9a757f4a5ddd7d96cd7d3385fb58 (diff)
downloademacs-7b33268a39471c028962523cd30da880af5d3ab8.tar.gz
(cvs-mode-find-file): Fixed the last patch's logic.
Diffstat (limited to 'lisp/pcvs.el')
-rw-r--r--lisp/pcvs.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/pcvs.el b/lisp/pcvs.el
index 2ecae236f9b..b7dac609078 100644
--- a/lisp/pcvs.el
+++ b/lisp/pcvs.el
@@ -14,7 +14,7 @@
;; (Jari Aalto+mail.emacs) jari.aalto@poboxes.com
;; Maintainer: (Stefan Monnier) monnier+lists/cvs/pcl@flint.cs.yale.edu
;; Keywords: CVS, version control, release management
-;; Revision: $Id: pcvs.el,v 1.51 2003/04/20 22:03:00 sds Exp $
+;; Revision: $Id: pcvs.el,v 1.52 2003/05/01 00:46:41 monnier Exp $
;; This file is part of GNU Emacs.
@@ -1901,8 +1901,9 @@ With a prefix, opens the buffer in an OTHER window."
(interactive (list last-input-event current-prefix-arg))
;; If the event moves point, check that it moves it to a valid location.
(when (and (/= (point) (progn (ignore-errors (mouse-set-point e)) (point)))
- (memq (get-text-property (1- (line-end-position)) 'font-lock-face)
- '(cvs-header-face cvs-filename-face)))
+ (not (memq (get-text-property (1- (line-end-position))
+ 'font-lock-face)
+ '(cvs-header-face cvs-filename-face))))
(error "Not a file name"))
(cvs-mode!
(lambda (&optional rev)