Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-06-14 04:21:24 +00:00
Code Issues Projects Releases Packages Wiki Activity

; Make 'default-korean-keyboard' a defcustom

Browse source 
* lisp/language/korea-util.el (default-korean-keyboard): Now a
defcustom.  (Bug#80648)
This commit is contained in:
Eli Zaretskii 2026-03-25 14:59:56 +02:00
parent 617b254fe3
commit 23b16cd696
1 changed files with 11 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
lisp/language/korea-util.el
View file

@ -27,13 +27,22 @@
;;; Code:
(defgroup korean nil
"Options for writing Korean."
:version "31.1"
:group 'languages)
;;;###autoload
(defvar default-korean-keyboard
(defcustom default-korean-keyboard
(if (string-search "3" (or (getenv "HANGUL_KEYBOARD_TYPE") ""))
"3"
"")
"The kind of Korean keyboard for Korean (Hangul) input method.
\"\" for 2, \"3\" for 3, and \"3f\" for 3f.")
\"\" for 2, \"3\" for 3, and \"3f\" for 3f."
:initialize #'custom-initialize-delay
:group 'korean
:version "31.1"
:type 'string)
;; functions useful for Korean text input