projects
/
chise
/
ids.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
(U+2E980): Modify structure; preserve the previous IDS as an apparent
[chise/ids.git]
/
ids-find.el
diff --git
a/ids-find.el
b/ids-find.el
index
6dffafa
..
9684d89
100644
(file)
--- a/
ids-find.el
+++ b/
ids-find.el
@@
-772,6
+772,9
@@
COMPONENT can be a character or char-spec."
ret dest sub)
(while rest
(setq cell (pop rest))
+ (if (and (consp cell)
+ (setq ret (find-char cell)))
+ (setq cell ret))
(cond
((and (consp cell)
(cond ((setq ret (assq 'ideographic-structure cell))