[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/composite.el,v
From: |
Kenichi Handa |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/composite.el,v |
Date: |
Thu, 26 Jun 2008 07:26:39 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Kenichi Handa <handa> 08/06/26 07:26:39
Index: composite.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/composite.el,v
retrieving revision 1.32
retrieving revision 1.33
diff -u -b -r1.32 -r1.33
--- composite.el 26 Jun 2008 04:16:09 -0000 1.32
+++ composite.el 26 Jun 2008 07:26:39 -0000 1.33
@@ -452,7 +452,8 @@
(= (aref char-width-table (aref string pos)) 0))
(setq pos (1+ pos)))
(if (and (> from 0)
- (terminal-composition-base-character-p (aref string (1-
from))))
+ (terminal-composition-base-character-p
+ (aref string (1- from))))
(compose-string string (1- from) pos)
(compose-string string from pos
(concat " " (buffer-substring from pos)))))
@@ -460,7 +461,7 @@
(= (aref char-width-table (char-after pos)) 0))
(setq pos (1+ pos)))
(if (and (> from (point-min))
- (terminal-composition-base-character-p (char-after pos)))
+ (terminal-composition-base-character-p (char-after (1- from))))
(compose-region (1- from) pos)
(compose-region from pos
(concat " " (buffer-substring from pos)))))