Commits

aidan  committed 961b9a4

Tell the category infrastructure about the Mule-UCS coding systems.

  • Participants
  • Parent commits 2f0711a

Comments (0)

Files changed (2)

File lisp/ChangeLog

+2007-09-30  Aidan Kehoe  <kehoea@parhasard.net>
+
+	* un-define.el (un-define):
+	Tell the category infrastructure about the Mule-UCS coding
+	systems.
+
 2007-08-08  Aidan Kehoe  <kehoea@parhasard.net>
 
 	* trans-util.el:

File lisp/un-define.el

        (mucs-define-coding-system
 	(nth 0 y) (nth 1 y) (nth 2 y)
 	(nth 3 y) (nth 4 y) (nth 5 y) (nth 6 y))
-       (coding-system-put (car y) 'alias-coding-systems (list (car x))))
+       (coding-system-put (car y) 'alias-coding-systems (list (car x)))
+       (when (memq (car x) (coding-category-list))
+         (coding-system-put (car y) 'category (car x))))
      (cdr x)))
   `((utf-8
      (utf-8-unix