]> code.delx.au - gnu-emacs/blobdiff - lisp/cvs-status.el
(ebrowse-tree-mode-map): Use display-mouse-p instead of window-system.
[gnu-emacs] / lisp / cvs-status.el
index ed52d0fea821ac829b4c8cbf677d582b8e38bde9..b7cfdff9d3caa519bf29b49c0b115603d86d910f 100644 (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.1 2000/03/11 03:42:28 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.
 
@@ -92,9 +92,7 @@
 
 (put 'cvs-status-mode 'mode-class 'special)
 ;;;###autoload
-(autoload 'cvs-status-mode "cvs-status" "Mode used for cvs status output." t)
-(eval-when-compile (autoload 'easy-mmode-define-derived-mode "easy-mmode"))
-(easy-mmode-define-derived-mode cvs-status-mode fundamental-mode "CVS-Status"
+(define-derived-mode cvs-status-mode fundamental-mode "CVS-Status"
   "Mode used for cvs status output."
   (set (make-local-variable 'font-lock-defaults) cvs-status-font-lock-defaults)
   (set (make-local-variable 'cvs-minor-wrap-function) 'cvs-status-minor-wrap))
                (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)
@@ -507,6 +504,15 @@ Optional prefix ARG chooses between two representations."
 (provide 'cvs-status)
 
 ;;; Change Log:
-;; $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.
+;; (cvs-tree-dstr-*): Rename from cvstree-dstr-* and use two ascii chars
+;; to let the output "breathe" a little more (more readable).
+;;
 
 ;;; cvs-status.el ends here