(thai-auto-composition-mode, thai-word-mode): Specify :group.

1 files changed, 6 insertions, 6 deletions

diff --git a/lisp/language/thai-util.el b/lisp/language/thai-util.el
index 6c121c60db2..dea05a4c948 100644
--- a/lisp/language/thai-util.el
+++ b/lisp/language/thai-util.el
@@ -278,7 +278,7 @@ if necessary."
 
 (defun thai-compose-syllable (beg end &optional category-set string)
   (or category-set
-      (setq category-set 
+      (setq category-set
             (char-category-set (if string (aref string beg) (char-after beg)))))
   (if (aref category-set ?c)
       ;; Starting with a consonant.  We do relative composition.
@@ -287,9 +287,9 @@ if necessary."
         (compose-region beg end))
     ;; Vowel tone sequence.
     (if string
-        (compose-string string beg end (list (aref string beg) '(Bc . Bc) 
+        (compose-string string beg end (list (aref string beg) '(Bc . Bc)
                                              (aref string (1+ beg))))
-      (compose-region beg end (list (char-after beg) '(Bc . Bc) 
+      (compose-region beg end (list (char-after beg) '(Bc . Bc)
                                     (char-after (1+ beg))))))
   (- end beg))
 
@@ -347,7 +347,7 @@ The return value is number of composed characters."
       (if string
           (if (eq (string-match thai-composition-pattern string from) from)
               (thai-compose-syllable from (match-end 0) nil string))
-        (if (save-excursion 
+        (if (save-excursion
               (goto-char from)
               (and (looking-at thai-composition-pattern)
                    (setq to (match-end 0))))
@@ -375,7 +375,7 @@ The return value is number of composed characters."
 ;;;###autoload
 (define-minor-mode thai-auto-composition-mode
   "Minor mode for automatically correct Thai character composition."
-  nil nil nil
+  :group 'mule
   (cond ((null thai-auto-composition-mode)
          (remove-hook 'after-change-functions 'thai-auto-composition))
         (t
@@ -397,7 +397,7 @@ The return value is number of composed characters."
 (define-minor-mode thai-word-mode
   "Minor mode to make word-oriented commands aware of Thai words.
 The commands affected are \\[forward-word], \\[backward-word], \\[kill-word], \\[backward-kill-word], \\[transpose-words], and \\[fill-paragraph]."
-  :global t
+  :global t :group 'mule
   (cond (thai-word-mode
          ;; This enables linebreak between Thai characters.
          (modify-category-entry (make-char 'thai-tis620) ?|)