Mercurial > emacs

changeset 96324:f03cdab98409

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(terminal-composition-function): Fix previous change.
author Kenichi Handa <handa@m17n.org>
date Thu, 26 Jun 2008 07:26:39 +0000
parents 3b62d9a85b3f
children 7069b5203540
files lisp/composite.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/composite.el	Thu Jun 26 07:25:25 2008 +0000
+++ b/lisp/composite.el	Thu Jun 26 07:26:39 2008 +0000
@@ -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)))))