[Emacs-diffs] Changes to emacs/lisp/pcvs.el

[Stefan Monnier]

Index: emacs/lisp/pcvs.el
diff -c emacs/lisp/pcvs.el:1.39 emacs/lisp/pcvs.el:1.40
*** emacs/lisp/pcvs.el:1.39     Mon Sep  2 21:40:29 2002
--- emacs/lisp/pcvs.el  Fri Sep 13 14:25:26 2002
***************
*** 14,20 ****
  ;;    (Jari Aalto+mail.emacs) address@hidden
  ;; Maintainer: (Stefan Monnier) monnier+lists/cvs/address@hidden
  ;; Keywords: CVS, version control, release management
! ;; Revision: $Id: pcvs.el,v 1.39 2002/09/03 01:40:29 monnier Exp $
  
  ;; This file is part of GNU Emacs.
  
--- 14,20 ----
  ;;    (Jari Aalto+mail.emacs) address@hidden
  ;; Maintainer: (Stefan Monnier) monnier+lists/cvs/address@hidden
  ;; Keywords: CVS, version control, release management
! ;; Revision: $Id: pcvs.el,v 1.40 2002/09/13 18:25:26 monnier Exp $
  
  ;; This file is part of GNU Emacs.
  
***************
*** 1888,1894 ****
  With a prefix, opens the buffer in an OTHER window."
    (interactive (list last-input-event current-prefix-arg))
    (when (ignore-errors (mouse-set-point e) t) ;for invocation via the mouse
!     (unless (memq (get-text-property (point) 'face)
                  '(cvs-header-face cvs-filename-face))
        (error "Not a file name")))
    (cvs-mode!
--- 1888,1894 ----
  With a prefix, opens the buffer in an OTHER window."
    (interactive (list last-input-event current-prefix-arg))
    (when (ignore-errors (mouse-set-point e) t) ;for invocation via the mouse
!     (unless (memq (get-text-property (1- (line-end-position)) 'face)
                  '(cvs-header-face cvs-filename-face))
        (error "Not a file name")))
    (cvs-mode!