summaryrefslogtreecommitdiff
path: root/lisp/play
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2005-01-17 23:50:23 +0000
committerRichard M. Stallman <rms@gnu.org>2005-01-17 23:50:23 +0000
commitb64e46503fdc4dc3e5a8613660a5c71b1bb1eaaa (patch)
treee07d540261e77b84f4169a77ffb031a11c6d313e /lisp/play
parent053be11a8844e0dbc448e7b9a977fb815b438c2f (diff)
downloademacs-b64e46503fdc4dc3e5a8613660a5c71b1bb1eaaa.tar.gz
(decipher-mode): Don't call decipher-read-alphabet if buffer is empty.
Diffstat (limited to 'lisp/play')
-rw-r--r--lisp/play/decipher.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/play/decipher.el b/lisp/play/decipher.el
index 7c08856da80..00bcbbf13c5 100644
--- a/lisp/play/decipher.el
+++ b/lisp/play/decipher.el
@@ -305,7 +305,8 @@ The most useful commands are:
(setq case-fold-search nil)) ;Case is significant when searching
(use-local-map decipher-mode-map)
(set-syntax-table decipher-mode-syntax-table)
- (decipher-read-alphabet)
+ (unless (= (point-min) (point-max))
+ (decipher-read-alphabet))
(set (make-local-variable 'font-lock-defaults)
'(decipher-font-lock-keywords t))
;; Make the buffer writable when we exit Decipher mode: