X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/ecae6af979abcbb5b45c33ee05ceb297678ec9a0..ef62b23df5a7007c3d8c74dbca87ba83e9da682e:/lisp/language/tv-util.el diff --git a/lisp/language/tv-util.el b/lisp/language/tv-util.el index 96672eeff2..400856d1aa 100644 --- a/lisp/language/tv-util.el +++ b/lisp/language/tv-util.el @@ -1,6 +1,6 @@ ;;; tv-util.el --- support for Tai Viet -*- coding: utf-8 -*- -;; Copyright (C) 2007, 2008 +;; Copyright (C) 2007, 2008, 2009, 2010, 2011 ;; National Institute of Advanced Industrial Science and Technology (AIST) ;; Registration Number H13PRO009 @@ -24,8 +24,7 @@ ;;; Code ;; Regexp matching with a sequence of Tai Viet characters. -(defconst tai-viet-re - (format "[\xaa80-\xaac2\xaadb-\xaadf-]+")) +(defconst tai-viet-re "[\xaa80-\xaac2\xaadb-\xaadf]+") ;; Char-table of information about glyph type of Tai Viet characters. (defconst tai-viet-glyph-info @@ -140,4 +139,3 @@ ;; (provide 'tai-viet-util) -;; arch-tag: a45ac3fc-07d0-44d5-8841-2ebea7e11f5b