# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 856959106 0
# Node ID e75db0b60c9d5461111d2843250c7f7fb501fa05
# Parent  5810f3bb79d9c5f33716d94aae6dd8b647107594
Remove prefix "coding-system-" from coding system symbol names.

diff -r 5810f3bb79d9 -r e75db0b60c9d lisp/international/kkc.el
--- a/lisp/international/kkc.el	Wed Feb 26 12:10:24 1997 +0000
+++ b/lisp/international/kkc.el	Wed Feb 26 12:11:46 1997 +0000
@@ -58,7 +58,7 @@
   "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 'coding-system-iso-2022-7))
+      (let ((coding-system-for-write 'iso-2022-7))
 	(write-region (format "(setq kkc-lookup-cache '%S)\n" kkc-lookup-cache)
 		      nil
 		      kkc-init-file-name))))