]> code.delx.au - gnu-emacs/blobdiff - lisp/language/mlm-util.el
Merge from emacs--devo--0
[gnu-emacs] / lisp / language / mlm-util.el
index 16246aaa2ba6c8485e3f7412f36cfaa7fb88cefa..4d40f0dcb42974107d40d7a1d5c3e452f88e41b4 100644 (file)
@@ -1,6 +1,6 @@
 ;;; mlm-util.el --- support for composing malayalam characters  -*-coding: iso-2022-7bit;-*-
 
-;; Copyright (C) 2003 Free Software Foundation, Inc.
+;; Copyright (C) 2003, 2004, 2005, 2006  Free Software Foundation, Inc.
 
 ;; Maintainer:  KAWABATA, Taichi <kawabata@m17n.org>
 ;; Keywords: multilingual, Malayalam
@@ -19,8 +19,8 @@
 
 ;; You should have received a copy of the GNU General Public License
 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
 
 ;; Created: Feb. 11. 2003
 
@@ -235,7 +235,7 @@ In this case, compose characters after POS of the string."
     ("\e$,1@H@m@E\e(B" . "\e$,47Y\e(B")
     ("\e$,1@H@m@Q\e(B" . "\e$,47b\e(B")
     ("\e$,1@H@a\e(B" . "\e$,47k\e(B")
-    ("\e$,1@H@m@H@a\e(B" . "\e$,47l\e(B") 
+    ("\e$,1@H@m@H@a\e(B" . "\e$,47l\e(B")
 
     ("\e$,1@J\e(B" . "\e$,46=\e(B")
     ("\e$,1@J@m@J\e(B" . "\e$,478\e(B") ;; duplicate
@@ -403,7 +403,7 @@ In this case, compose characters after POS of the string."
                (apply
                 'nconc
                 (mapcar
-                 (function 
+                 (function
                   (lambda (x) (list '(5 . 3) x))) ;; default ref. point.
                  glyph-str))))
         (compose-region from to glyph-str)))))