Mercurial > emacs
comparison lisp/msb.el @ 90140:02f1dbc4a199
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-35
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 228-240)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 53-58)
- Merge from emacs--cvs-trunk--0
- Update from CVS
- Collapse feature addition/removal within single ChangeLog entry
author | Miles Bader <miles@gnu.org> |
---|---|
date | Sat, 09 Apr 2005 02:16:29 +0000 |
parents | f3ec05478165 38d05b1ac290 |
children | bb71c6cf2009 |
comparison
equal
deleted
inserted
replaced
90139:e0d294b9b23e | 90140:02f1dbc4a199 |
---|---|
1 ;;; msb.el --- customizable buffer-selection with multiple menus | 1 ;;; msb.el --- customizable buffer-selection with multiple menus |
2 | 2 |
3 ;; Copyright (C) 1993, 94, 95, 97, 98, 99, 2000, 2001, 2003 | 3 ;; Copyright (C) 1993, 1994, 1995, 1997, 1998, 1999, 2000, 2001, 2003, |
4 ;; Free Software Foundation, Inc. | 4 ;; 2005 Free Software Foundation, Inc. |
5 | 5 |
6 ;; Author: Lars Lindberg <lars.lindberg@home.se> | 6 ;; Author: Lars Lindberg <lars.lindberg@home.se> |
7 ;; Maintainer: FSF | 7 ;; Maintainer: FSF |
8 ;; Created: 8 Oct 1993 | 8 ;; Created: 8 Oct 1993 |
9 ;; Lindberg's last update version: 3.34 | 9 ;; Lindberg's last update version: 3.34 |
1139 (define-minor-mode msb-mode | 1139 (define-minor-mode msb-mode |
1140 "Toggle Msb mode. | 1140 "Toggle Msb mode. |
1141 With arg, turn Msb mode on if and only if arg is positive. | 1141 With arg, turn Msb mode on if and only if arg is positive. |
1142 This mode overrides the binding(s) of `mouse-buffer-menu' to provide a | 1142 This mode overrides the binding(s) of `mouse-buffer-menu' to provide a |
1143 different buffer menu using the function `msb'." | 1143 different buffer menu using the function `msb'." |
1144 :global t | 1144 :global t :group 'msb |
1145 (if msb-mode | 1145 (if msb-mode |
1146 (progn | 1146 (progn |
1147 (add-hook 'menu-bar-update-hook 'msb-menu-bar-update-buffers) | 1147 (add-hook 'menu-bar-update-hook 'msb-menu-bar-update-buffers) |
1148 (remove-hook 'menu-bar-update-hook 'menu-bar-update-buffers) | 1148 (remove-hook 'menu-bar-update-hook 'menu-bar-update-buffers) |
1149 (msb-menu-bar-update-buffers t)) | 1149 (msb-menu-bar-update-buffers t)) |