# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1197272232 0
# Node ID 13e59b921313b677cddcd636c459175ba0937c41
# Parent  040f2e332dc32280d6430ee79444d1cb01ddb01e
(auto-compose-chars): Be sure to calculate
composition at least at POS.

diff -r 040f2e332dc3 -r 13e59b921313 lisp/composite.el
--- a/lisp/composite.el	Mon Dec 10 07:36:01 2007 +0000
+++ b/lisp/composite.el	Mon Dec 10 07:37:12 2007 +0000
@@ -489,7 +489,8 @@
 		  auto-compose-current-font
 		  ch func newpos)
 	      (setq limit
-		    (or (text-property-any pos limit 'auto-composed t string)
+		    (or (text-property-any (1+ pos) limit 'auto-composed t
+					   string)
 			limit)
 		    pos 
 		    (catch 'tag