Mercurial > emacs
changeset 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 | cb92a959c5ff |
children | b67d7273ec18 |
files | lisp/ChangeLog lisp/bindings.el |
diffstat | 2 files changed, 3 insertions(+), 18 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Apr 30 21:29:12 2010 -0400 +++ b/lisp/ChangeLog Fri Apr 30 21:39:58 2010 -0400 @@ -1,5 +1,8 @@ 2010-05-01 Stefan Monnier <monnier@iro.umontreal.ca> + * bindings.el (mode-line-abbrev-mode, mode-line-auto-fill-mode): + Remove unused functions. + * emacs-lisp/lisp-mode.el (lisp-mode): Use define-derived-mode. Set find-tag-default-function as a variable rather than a property.
--- 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]