diff lisp/strokes.el @ 106030:cbcd940e3d89

* strokes.el (strokes-update-window-configuration): Make strokes buffer current before erasing (Bug#4906).
author Chong Yidong <cyd@stupidchicken.com>
date Sun, 15 Nov 2009 15:59:05 +0000
parents 009383a57ce8
children 1d1d5d9bd884
line wrap: on
line diff
--- a/lisp/strokes.el	Sun Nov 15 15:37:17 2009 +0000
+++ b/lisp/strokes.el	Sun Nov 15 15:59:05 2009 +0000
@@ -1061,13 +1061,12 @@
 	   ;; create `strokes-window-configuration' from scratch...
 	   (save-excursion
 	     (save-window-excursion
-	       (get-buffer-create strokes-buffer-name)
+	       (set-buffer (get-buffer-create strokes-buffer-name))
 	       (set-window-buffer current-window strokes-buffer-name)
 	       (delete-other-windows)
 	       (fundamental-mode)
 	       (auto-save-mode 0)
-	       (if (featurep 'font-lock)
-		   (font-lock-mode 0))
+	       (font-lock-mode 0)
 	       (abbrev-mode 0)
 	       (buffer-disable-undo (current-buffer))
 	       (setq truncate-lines nil)