diff options
Diffstat (limited to 'lisp')
| -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.") |