summaryrefslogtreecommitdiff
path: root/lisp/strokes.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2009-11-15 15:59:05 +0000
committerChong Yidong <cyd@stupidchicken.com>2009-11-15 15:59:05 +0000
commitd7063de9b8682d080addd9fe74bf979b6227c978 (patch)
tree018c76402f00bd230bc05743a5d365f471ab4956 /lisp/strokes.el
parent0566c4bc6bbcc88c4bbceda0de362e77b51c20ec (diff)
downloademacs-d7063de9b8682d080addd9fe74bf979b6227c978.tar.gz
* strokes.el (strokes-update-window-configuration): Make strokes
buffer current before erasing (Bug#4906).
Diffstat (limited to 'lisp/strokes.el')
-rw-r--r--lisp/strokes.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/strokes.el b/lisp/strokes.el
index ba5ca20a2c1..e2f5093de18 100644
--- a/lisp/strokes.el
+++ b/lisp/strokes.el
@@ -1061,13 +1061,12 @@ This is based on the last time `strokes-window-configuration' was updated."
;; 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)