Mercurial > hg > xemacs-beta

comparison lisp/x-menubar.el @ 233:52952cbfc5b5 r20-5b15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b15
author cvs
date Mon, 13 Aug 2007 10:14:14 +0200
parents 557eaa0339bf
children 89ec2bb86eea
comparison
equal deleted inserted replaced
232:aa6545ea0638 233:52952cbfc5b5
987 The grouping function is specified in `buffers-menu-grouping-function'. 987 The grouping function is specified in `buffers-menu-grouping-function'.
988 If this is an integer, do not build submenus if the number of buffers 988 If this is an integer, do not build submenus if the number of buffers
989 is not larger than this value." 989 is not larger than this value."
990 :type '(choice (const :tag "No Subgroups" nil) 990 :type '(choice (const :tag "No Subgroups" nil)
991 (integer :tag "Max. submenus" 10) 991 (integer :tag "Max. submenus" 10)
992 (sexp :format "%t\n" :tag "Allow Subgroups")) 992 (const :tag "Allow Subgroups" t))
993 :group 'buffers-menu) 993 :group 'buffers-menu)
994 994
995 (defcustom buffers-menu-switch-to-buffer-function 'switch-to-buffer 995 (defcustom buffers-menu-switch-to-buffer-function 'switch-to-buffer
996 "*The function to call to select a buffer from the buffers menu. 996 "*The function to call to select a buffer from the buffers menu.
997 `switch-to-buffer' is a good choice, as is `pop-to-buffer'." 997 `switch-to-buffer' is a good choice, as is `pop-to-buffer'."