Mercurial > emacs
diff lisp/bindings.el @ 108182:7aa45e6e5f62
* bindings.el (mode-line-abbrev-mode, mode-line-auto-fill-mode): Remove.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Fri, 30 Apr 2010 21:39:58 -0400 |
parents | 56d11bda8235 |
children | cd5442b2826b |
line wrap: on
line diff
--- a/lisp/bindings.el Fri Apr 30 21:29:12 2010 -0400 +++ b/lisp/bindings.el Fri Apr 30 21:39:58 2010 -0400 @@ -62,24 +62,6 @@ (force-mode-line-update))) -(defun mode-line-abbrev-mode (event) - "Turn off `abbrev-mode' from the mode-line." - (interactive "e") - (save-selected-window - (select-window (posn-window (event-start event))) - (abbrev-mode) - (force-mode-line-update))) - - -(defun mode-line-auto-fill-mode (event) - "Turn off `auto-fill-mode' from the mode-line." - (interactive "e") - (save-selected-window - (select-window (posn-window (event-start event))) - (auto-fill-mode) - (force-mode-line-update))) - - (defvar mode-line-input-method-map (let ((map (make-sparse-keymap))) (define-key map [mode-line mouse-2]