[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/ps-mule.el,v
From: |
Kenichi Handa |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/ps-mule.el,v |
Date: |
Thu, 21 Feb 2008 01:57:11 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Kenichi Handa <handa> 08/02/21 01:57:11
Index: ps-mule.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/ps-mule.el,v
retrieving revision 1.59
retrieving revision 1.60
diff -u -b -r1.59 -r1.60
--- ps-mule.el 20 Feb 2008 12:15:57 -0000 1.59
+++ ps-mule.el 21 Feb 2008 01:57:10 -0000 1.60
@@ -276,7 +276,7 @@
(indian-1-column
(normal bdf ("ind1c24-mule.bdf" "mule-indian-1col-24.bdf")))
(ethiopic
- (normal bdf ("ethio24f-uni.bdf" "ethiomx24f-uni.bdf") unicode-bmp))
+ (normal bdf ("ethio16f-uni.bdf" "ethiomx24f-uni.bdf") unicode-bmp))
(chinese-cns11643-3
(normal bdf ("cns3-40.bdf" "cns-3-40.bdf")))
(chinese-cns11643-4
@@ -661,7 +661,10 @@
(let* ((average-width (ps-avg-char-width 'ps-font-for-text))
(point (point))
(composition (find-composition from to nil t))
- (stop (if composition (car composition) to))
+ (stop (if (and composition
+ (not (vectorp (aref (nth 2 composition) 0))))
+ (car composition)
+ to))
(ascii-or-latin-1 "[\000-\377]+")
(run-width 0)
(endpos nil)