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

(cvs-status-minor-wrap): Use mark-active.

Browse source
This commit is contained in:
Stefan Monnier 2000-05-10 22:08:28 +00:00
parent 9ea60c46a0
commit befe763f45
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/cvs-status.el
View file

@ -5,7 +5,7 @@
;; Author: Stefan Monnier <monnier@cs.yale.edu>
;; Keywords: pcl-cvs cvs status tree
;; Version: $Name: $
;; Revision: $Id: cvs-status.el,v 1.2 2000/03/22 01:01:36 monnier Exp $
;; Revision: $Id: cvs-status.el,v 1.3 2000/03/22 01:08:08 monnier Exp $
;; This file is part of GNU Emacs.
@ -142,8 +142,7 @@
(cons
(cons (cvs-status-current-file)
(cvs-status-current-tag))
(when (ignore-errors (mark))
;; `mark-active' is not provided by XEmacs :-(
(when mark-active
(save-excursion
(goto-char (mark))
(cons (cvs-status-current-file)
@ -506,6 +505,9 @@ Optional prefix ARG chooses between two representations."
;;; Change Log:
;; $Log: cvs-status.el,v $
;; Revision 1.3 2000/03/22 01:08:08 monnier
;; (cvs-status-mode): Use define-derived-mode.
;;
;; Revision 1.2 2000/03/22 01:01:36 monnier
;; (cvs-status-(prev|next)): Rename from
;; cvs-status-(prev|next)-entry and use easy-mmode-define-navigation.