Commit a509862b authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(terminal-composition-function): Fix previous change.

parent 1fc66bca
......@@ -452,7 +452,8 @@ character. All non-spacing characters has this function in
(= (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 @@ character. All non-spacing characters has this function in
(= (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)))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment