Mercurial > emacs

comparison lisp/bindings.el @ 83514:d9f8d2a65d18

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merged from emacs@sv.gnu.org Patches applied: * emacs@sv.gnu.org/emacs--devo--0--patch-252 Merge from gnus--rel--5.10 * emacs@sv.gnu.org/emacs--devo--0--patch-253 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-254 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-255 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-256 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-257 Merge from gnus--rel--5.10 * emacs@sv.gnu.org/emacs--devo--0--patch-258 Clean up lisp/gnus/ChangeLog a bit * emacs@sv.gnu.org/emacs--devo--0--patch-259 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-260 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-261 lisp/replace.el (occur-engine): Bind `inhibit-field-text-motion' to t * emacs@sv.gnu.org/emacs--devo--0--patch-262 Update from CVS * emacs@sv.gnu.org/gnus--rel--5.10--patch-96 Update from CVS * emacs@sv.gnu.org/gnus--rel--5.10--patch-97 Update from CVS * emacs@sv.gnu.org/gnus--rel--5.10--patch-98 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-554
author Karoly Lorentey <lorentey@elte.hu>
date Wed, 03 May 2006 11:56:53 +0000
parents b98066f4aa10 45b7cad845ee
children a387c138b28e
comparison
equal deleted inserted replaced
83513:966a40e7fb54 83514:d9f8d2a65d18
317 317
318 (setq-default mode-line-modes 318 (setq-default mode-line-modes
319 (list 319 (list
320 (propertize "%[(" 'help-echo help-echo) 320 (propertize "%[(" 'help-echo help-echo)
321 `(:propertize ("" mode-name) 321 `(:propertize ("" mode-name)
322 help-echo "mouse-1: major-mode-menu mouse-2: help for current major mode" 322 help-echo "mouse-1: major mode, mouse-2: major mode help, mouse-3: toggle minor modes"
323 mouse-face mode-line-highlight 323 mouse-face mode-line-highlight
324 local-map ,mode-line-major-mode-keymap) 324 local-map ,mode-line-major-mode-keymap)
325 '("" mode-line-process) 325 '("" mode-line-process)
326 `(:propertize ("" minor-mode-alist) 326 `(:propertize ("" minor-mode-alist)
327 mouse-face mode-line-highlight 327 mouse-face mode-line-highlight
328 help-echo "mouse-2: help for minor modes, mouse-3: minor mode menu" 328 help-echo "mouse-2: minor mode help, mouse-3: toggle minor modes"
329 local-map ,mode-line-minor-mode-keymap) 329 local-map ,mode-line-minor-mode-keymap)
330 (propertize "%n" 'help-echo "mouse-2: widen" 330 (propertize "%n" 'help-echo "mouse-2: widen"
331 'mouse-face 'mode-line-highlight 331 'mouse-face 'mode-line-highlight
332 'local-map (make-mode-line-mouse-map 332 'local-map (make-mode-line-mouse-map
333 'mouse-2 #'mode-line-widen)) 333 'mouse-2 #'mode-line-widen))