From 23b16cd6968ad4ec9b8fd4e1258bc4001880b956 Mon Sep 17 00:00:00 2001
From: Eli Zaretskii <eliz@gnu.org>
Date: Wed, 25 Mar 2026 14:59:56 +0200
Subject: [PATCH] ; Make 'default-korean-keyboard' a defcustom

* lisp/language/korea-util.el (default-korean-keyboard): Now a
defcustom.  (Bug#80648)
---
 lisp/language/korea-util.el | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

diff --git a/lisp/language/korea-util.el b/lisp/language/korea-util.el
index da91e692719..cca702f71b0 100644
--- a/lisp/language/korea-util.el
+++ b/lisp/language/korea-util.el
@@ -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