mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-23 00:10:48 -08:00
Code Issues Projects Releases Wiki Activity

(cvs-mode-find-file): Work even if point is at beg-of-line.

Browse source
This commit is contained in:
Stefan Monnier 2002-09-13 18:25:26 +00:00
parent 4745e73833
commit 595015bbf8
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/pcvs.el
View file

@ -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.38 2002/06/25 00:11:28 monnier Exp $
;; Revision: $Id: pcvs.el,v 1.39 2002/09/03 01:40:29 monnier Exp $
;; This file is part of GNU Emacs.
@ -1888,7 +1888,7 @@ This command ignores files that are not flagged as `Unknown'."
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)
(unless (memq (get-text-property (1- (line-end-position)) 'face)
'(cvs-header-face cvs-filename-face))
(error "Not a file name")))
(cvs-mode!