Mercurial > hg > xemacs-beta
diff lisp/isearch-mode.el @ 710:a00780ef853d
[xemacs-hg @ 2001-12-22 07:20:57 by youngs]
2001-12-18 John Paul Wallington <jpw@shootybangbang.com>
* gnuserv.el:
(gnuserv-mode-line-string): new customizable variable
(gnuserv-minor-mode): make variable buffer-local
* isearch-mode.el:
(isearch-mode-line-string): new customizable variable
| author | youngs |
|---|---|
| date | Sat, 22 Dec 2001 07:20:58 +0000 |
| parents | 7039e6323819 |
| children | 943eaba38521 |
line wrap: on
line diff
--- a/lisp/isearch-mode.el Thu Dec 20 07:58:23 2001 +0000 +++ b/lisp/isearch-mode.el Sat Dec 22 07:20:58 2001 +0000 @@ -225,6 +225,13 @@ :type 'boolean :group 'isearch) +(defcustom isearch-mode-line-string " Isearch" + "*String to display in the modeline when `isearch-mode' is active. +Set this to nil if you don't want a modeline indicator." + :type '(choice string + (const :tag "none" nil)) + :group 'isearch) + ;;;==================================================== ;;; Define isearch-mode keymap. @@ -384,7 +391,7 @@ ;; Minor-mode-alist changes - kind of redundant with the ;; echo area, but if isearching in multiple windows, it can be useful. -(add-minor-mode 'isearch-mode 'isearch-mode) +(add-minor-mode 'isearch-mode 'isearch-mode-line-string) (defvar isearch-mode nil) ;; Name of the minor mode, if non-nil. (make-variable-buffer-local 'isearch-mode)