Mercurial > emacs
comparison lisp/play/decipher.el @ 65585:6d0d4d973f77
Message format spec fixes, commit no. 4
| author | Deepak Goel <deego@gnufans.org> |
|---|---|
| date | Sun, 18 Sep 2005 12:32:51 +0000 |
| parents | 34bd8e434dd7 |
| children | 836785857446 fa0da9b57058 |
comparison
equal
deleted
inserted
replaced
| 65584:6dbba0bd58df | 65585:6d0d4d973f77 |
|---|---|
| 598 (decipher-add-undo undo-rec))) | 598 (decipher-add-undo undo-rec))) |
| 599 | 599 |
| 600 (defun decipher-show-alphabet () | 600 (defun decipher-show-alphabet () |
| 601 "Display the current cipher alphabet in the message line." | 601 "Display the current cipher alphabet in the message line." |
| 602 (interactive) | 602 (interactive) |
| 603 (message | 603 (message "%s" |
| 604 (mapconcat (lambda (a) | 604 (mapconcat (lambda (a) |
| 605 (concat | 605 (concat |
| 606 (char-to-string (car a)) | 606 (char-to-string (car a)) |
| 607 (char-to-string (cdr a)))) | 607 (char-to-string (cdr a)))) |
| 608 decipher-alphabet | 608 decipher-alphabet |