set-charset-ccl-program

Hello, I read [1] while I tried to display Greek characters with a Unicode font. But in case the dimension of the charset is 1, it seems that the resulting code point 2 (R2) is not considered. (redisplay-x.c:separate_textual_runs is where to calculate the code point in the font.) This is what I did in unifont.el: (set-charset-registry 'greek-iso8859-7 "iso10646-1") (define-ccl-program ccl-encode-greek-iso8859-7-font `(0 ;; In: R0: greek-iso8859-7 (not checked) ;; R1: position code ;; Out: R1: font codepoint 1 ;; R2: font codepoint 2 [...] )) (set-charset-ccl-program 'greek-iso8859-7 ccl-encode-greek-iso8859-7-font) Footnotes: [1] http://www.m17n.org/ntakahas/npx/unifont.en.html Regards, -- Daiki Ueno