diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-04-12 07:54:16 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-04-12 07:54:16 +0000 |
| commit | 342df1e2476a934a46059fb947ddc2d9361f7b5e (patch) | |
| tree | 0db87d30ceb0427689144a5fe76c92547cb11975 /lisp/rot13.el | |
| parent | 82093c705b64d1b146dd01bf6c82e38fede98212 (diff) | |
| download | emacs-342df1e2476a934a46059fb947ddc2d9361f7b5e.tar.gz | |
(rot13-display-table): Use `vector', not `make-rope'.
Diffstat (limited to 'lisp/rot13.el')
| -rw-r--r-- | lisp/rot13.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/rot13.el b/lisp/rot13.el index 7c068bc1d81..d19a29db7dc 100644 --- a/lisp/rot13.el +++ b/lisp/rot13.el @@ -38,8 +38,8 @@ (let ((table (make-display-table)) (i 0)) (while (< i 26) - (aset table (+ i ?a) (make-rope (+ (% (+ i 13) 26) ?a))) - (aset table (+ i ?A) (make-rope (+ (% (+ i 13) 26) ?A))) + (aset table (+ i ?a) (vector (+ (% (+ i 13) 26) ?a))) + (aset table (+ i ?A) (vector (+ (% (+ i 13) 26) ?A))) (setq i (1+ i))) table) "Char table for rot 13 display.") |