summaryrefslogtreecommitdiff
path: root/lisp/language/korea-util.el
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2009-11-11 19:24:20 +0000
committerDan Nicolaescu <dann@ics.uci.edu>2009-11-11 19:24:20 +0000
commitaaa448c984ad227585dac4a2fe2ee5bdc467e25e (patch)
tree73cfced623c9a2f6596f52eb261a28660031cc33 /lisp/language/korea-util.el
parent04420943de5a7a92f94c7642b76990c77ca751f8 (diff)
downloademacs-aaa448c984ad227585dac4a2fe2ee5bdc467e25e.tar.gz
emacs-aaa448c984ad227585dac4a2fe2ee5bdc467e25e.tar.bz2
emacs-aaa448c984ad227585dac4a2fe2ee5bdc467e25e.zip
* widget.el (define-widget): Purecopy the docstring.
* international/mule-cmds.el (charset): Do not purecopy the docstring here, define-widget does it. * textmodes/texinfo.el (texinfo-open-quote, texinfo-close-quote): * textmodes/bibtex-style.el (auto-mode-alist): * progmodes/inf-lisp.el (inferior-lisp-prompt): * progmodes/compile.el (compile-command): * language/korea-util.el (default-korean-keyboard): * international/mule-conf.el (file-coding-system-alist): * emacs-lisp/eldoc.el (eldoc-minor-mode-string): * tooltip.el (tooltip-frame-parameters): * newcomment.el (comment-end, comment-padding): * dired.el (dired-trivial-filenames): * comint.el (comint-file-name-prefix): Purecopy initial values.
Diffstat (limited to 'lisp/language/korea-util.el')
-rw-r--r--lisp/language/korea-util.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/language/korea-util.el b/lisp/language/korea-util.el
index 8f653194f66..4755a781ade 100644
--- a/lisp/language/korea-util.el
+++ b/lisp/language/korea-util.el
@@ -30,9 +30,9 @@
;;;###autoload
(defvar default-korean-keyboard
- (if (string-match "3" (or (getenv "HANGUL_KEYBOARD_TYPE") ""))
+ (purecopy (if (string-match "3" (or (getenv "HANGUL_KEYBOARD_TYPE") ""))
"3"
- "")
+ ""))
"*The kind of Korean keyboard for Korean input method.
\"\" for 2, \"3\" for 3.")