# HG changeset patch # User Stefan Monnier # Date 953687288 0 # Node ID 3cfb9a01a935e4fea36f5cd9f9789d87cabb5c04 # Parent 090fad6a7bcb734493d1aeb68b04fbbb5617a382 (cvs-status-mode): Use define-derived-mode. diff -r 090fad6a7bcb -r 3cfb9a01a935 lisp/cvs-status.el --- a/lisp/cvs-status.el Wed Mar 22 01:01:36 2000 +0000 +++ b/lisp/cvs-status.el Wed Mar 22 01:08:08 2000 +0000 @@ -5,7 +5,7 @@ ;; Author: Stefan Monnier ;; 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.2 2000/03/22 01:01:36 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)) @@ -507,6 +505,12 @@ (provide 'cvs-status) ;;; Change Log: -;; $Log$ +;; $Log: cvs-status.el,v $ +;; 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