Commits

Anonymous committed b689e4a

* ibuffer.el (ibuffer-fontification-alist): add hyper-apropos-mode.
* ibuf-ext.el (ibuffer-toggle-sorting-mode): docfix.
(ibuffer-mark-help-buffers): add hyper-apropos-mode.

  • Participants
  • Parent commits b2b06c4

Comments (0)

Files changed (3)

+2002-02-25  John Paul Wallington  <jpw@xemacs.org>
+
+	* ibuffer.el (ibuffer-fontification-alist): add hyper-apropos-mode.
+	* ibuf-ext.el (ibuffer-toggle-sorting-mode): docfix.
+	(ibuffer-mark-help-buffers): add hyper-apropos-mode.
+	
 2002-02-24  John Paul Wallington  <jpw@xemacs.org>
 
 	* ibuffer.el (ibuffer-marked-face): replace defface and defvar
   "Toggle the current sorting mode.
 Default sorting modes are:
  Recency - the last time the buffer was viewed
- Name - the name of the buffer
- Major Mode - the name of the major mode of the buffer
- Size - the size of the buffer"
+ Name - the `buffer-name' of the buffer
+ Major Mode - the `major-mode' of the buffer
+ Size - the `buffer-size' of the buffer"
   (interactive)
   (let ((modes (mapcar 'car ibuffer-sorting-functions-alist)))
     (add-to-list 'modes 'recency)
 
 ;;;###autoload
 (defun ibuffer-mark-help-buffers ()
-  "Mark buffers like *Help*, *Apropos*, *Info*."
+  "Mark buffers like *Help*, *Apropos*, *Hyper Apropos*, *Info*."
   (interactive)
   (ibuffer-mark-on-buffer
    #'(lambda (buf)
        (with-current-buffer buf
 	 (or
 	  (eq major-mode 'apropos-mode)
+	  (eq major-mode 'hyper-apropos-mode)
 	  (eq major-mode 'help-mode)
-	  (eq major-mode 'info-mode))))))
+	  (eq major-mode 'Info-mode))))))
 
 ;;;###autoload
 (defun ibuffer-mark-old-buffers ()
   `((10 buffer-read-only ,ibuffer-read-only-buffer-face)
     (15 (string-match "^*" (buffer-name)) ,ibuffer-special-buffer-face)
     (20 (string-match "^ " (buffer-name)) ,ibuffer-hidden-buffer-face)
-    (25 (memq major-mode '(help-mode apropos-mode Info-mode Info-edit-mode)) ,ibuffer-help-buffer-face)
+    (25 (memq major-mode '(help-mode apropos-mode hyper-apropos-mode Info-mode Info-edit-mode)) ,ibuffer-help-buffer-face)
     (30 (eq major-mode 'dired-mode) ,ibuffer-dired-buffer-face))
   "An alist describing how to fontify buffers.
 Each element should be of the form (PRIORITY FORM FACE), where