aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2005-01-12 04:24:20 +0000
committerRichard M. Stallman2005-01-12 04:24:20 +0000
commit1b8d07559d30c3ce3229f7119ee9f06177ec8224 (patch)
treeabe895d7fdc62d02b66cb4b723070c29b58a8489
parentaac42a1b2cce228247ab21646cab881ecdf62221 (diff)
downloademacs-1b8d07559d30c3ce3229f7119ee9f06177ec8224.tar.gz
emacs-1b8d07559d30c3ce3229f7119ee9f06177ec8224.zip
(type-break-mode): Fix previous change.
-rw-r--r--lisp/type-break.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/type-break.el b/lisp/type-break.el
index b51a74ea37e..7a387bfe062 100644
--- a/lisp/type-break.el
+++ b/lisp/type-break.el
@@ -389,6 +389,9 @@ problems."
389 (and (interactive-p) 389 (and (interactive-p)
390 (message "Type Break mode is already enabled"))) 390 (message "Type Break mode is already enabled")))
391 (type-break-mode 391 (type-break-mode
392 (with-current-buffer (find-file-noselect type-break-file-name 'nowarn)
393 (setq buffer-save-without-query t))
394
392 (or global-mode-string 395 (or global-mode-string
393 (setq global-mode-string '(""))) 396 (setq global-mode-string '("")))
394 (or (assq 'type-break-mode-line-message-mode 397 (or (assq 'type-break-mode-line-message-mode
@@ -433,7 +436,6 @@ problems."
433 (do-auto-save) 436 (do-auto-save)
434 (with-current-buffer (find-file-noselect type-break-file-name 437 (with-current-buffer (find-file-noselect type-break-file-name
435 'nowarn) 438 'nowarn)
436 (setq buffer-save-without-query t)
437 (set-buffer-modified-p nil) 439 (set-buffer-modified-p nil)
438 (unlock-buffer) 440 (unlock-buffer)
439 (kill-this-buffer)) 441 (kill-this-buffer))