diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-03-26 03:32:46 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-03-26 03:32:46 +0000 |
| commit | 0ec08b38001ff9e3f8ec59133a70b217330a3763 (patch) | |
| tree | db9d4d26d170f650c581eea9a3189cd31fd97d3a /lisp/bindings.el | |
| parent | 554fde6ed7a93c11c587eb58679b23f93df4b8ca (diff) | |
| download | emacs-0ec08b38001ff9e3f8ec59133a70b217330a3763.tar.gz | |
(mode-line-change-eol): Use with-selected-window.
Diffstat (limited to 'lisp/bindings.el')
| -rw-r--r-- | lisp/bindings.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el index b2f051cf030..7e24013b699 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el @@ -138,8 +138,7 @@ corresponding to the mode line clicked." (defun mode-line-change-eol (event) "Cycle through the various possible kinds of end-of-line styles." (interactive "e") - (save-selected-window - (select-window (posn-window (event-start event))) + (with-selected-window (posn-window (event-start event)) (let ((eol (coding-system-eol-type buffer-file-coding-system))) (set-buffer-file-coding-system (cond ((eq eol 0) 'dos) ((eq eol 1) 'mac) (t 'unix)))))) |