Mercurial > emacs
changeset 37016:7472ec46ab91
(kkc-save-init-file): Locally bind print-length to nil.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 27 Mar 2001 01:12:42 +0000 |
| parents | f8dd0e40dc34 |
| children | 64580e47a5aa |
| files | lisp/international/kkc.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/kkc.el Mon Mar 26 18:43:58 2001 +0000 +++ b/lisp/international/kkc.el Tue Mar 27 01:12:42 2001 +0000 @@ -61,7 +61,8 @@ "Save initial setup code for KKC to a file specified by `kkc-init-file-name'" (if (and kkc-init-file-flag (not (eq kkc-init-file-flag t))) - (let ((coding-system-for-write 'iso-2022-7bit)) + (let ((coding-system-for-write 'iso-2022-7bit) + (print-length nil)) (write-region (format "(setq kkc-lookup-cache '%S)\n" kkc-lookup-cache) nil kkc-init-file-name))))