X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/26e06f4464c58704889bdc536edc25b73e8c0179..fcb11aef80477e6218e1de01f71001fdce3f7a9a:/lisp/language/cham.el

diff --git a/lisp/language/cham.el b/lisp/language/cham.el
index 80e92243c4..a025ff0d20 100644
--- a/lisp/language/cham.el
+++ b/lisp/language/cham.el
@@ -1,6 +1,6 @@
-;;; cham.el --- support for Cham -*- coding: utf-8; no-byte-compile: t -*-
+;;; cham.el --- support for Cham -*- coding: utf-8 -*-
 
-;; Copyright (C) 2008
+;; Copyright (C) 2008, 2009, 2010, 2011, 2012
 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
 ;;   Registration Number H13PRO009
 
@@ -29,7 +29,7 @@
 
 (set-char-table-range composition-function-table
 		      '(#xAA00 . #xAA5F)
-		      '(("[\xAA00-\xAA5F]+" . font-shape-text)))
+		      (list (vector "[\xAA00-\xAA5F]+" 0 'font-shape-gstring)))
 
 (set-language-info-alist
  "Cham" '((charset unicode)
@@ -37,9 +37,3 @@
 	      (coding-priority utf-8)))
 
 (provide 'cham)
-
-;; Local Variables:
-;; coding: utf-8
-;; End:
-
-;; arch-tag: a393ea52-445b-4e22-a967-c244afc88cf6