From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 26 Mar 2008 03:32:46 +0000 (+0000)
Subject: (mode-line-change-eol): Use with-selected-window.
X-Git-Tag: emacs-pretest-23.0.90~6912
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0ec08b38001ff9e3f8ec59133a70b217330a3763;p=emacs.git

(mode-line-change-eol): Use with-selected-window.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b97c37f1f9b..97e59b46f25 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2008-03-26  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* bindings.el (mode-line-change-eol): Use with-selected-window.
+
 	* apropos.el (apropos-command): Include macros.
 
 2008-03-26  Glenn Morris  <rgm@gnu.org>
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))))))