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))