changeset 59604:15fecef37804

(decipher-mode): Don't call decipher-read-alphabet if buffer is empty.
author Richard M. Stallman <rms@gnu.org>
date Mon, 17 Jan 2005 23:50:23 +0000
parents 19bde7f71d99
children b64dd2ff73f7
files lisp/play/decipher.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/play/decipher.el	Mon Jan 17 23:49:20 2005 +0000
+++ b/lisp/play/decipher.el	Mon Jan 17 23:50:23 2005 +0000
@@ -305,7 +305,8 @@
       (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: