# HG changeset patch # User Stefan Monnier # Date 1272677998 14400 # Node ID 7aa45e6e5f624b9f3e475329d1fbf59047e33914 # Parent cb92a959c5ff2921e3d1d0c16559c8f780a22e07 * bindings.el (mode-line-abbrev-mode, mode-line-auto-fill-mode): Remove. diff -r cb92a959c5ff -r 7aa45e6e5f62 lisp/ChangeLog --- 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 + * 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. diff -r cb92a959c5ff -r 7aa45e6e5f62 lisp/bindings.el --- 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]