(set-char-table-range
composition-function-table
- '(#x600 . #x6FF)
- (list ["[\u0600-\u06FF]+" 0 font-shape-gstring]))
+ '(#x600 . #x74F)
+ (list (vector "[\u0600-\u074F\u200C\u200D]+" 0 'font-shape-gstring)
+ (vector "[\u200C\u200D][\u0600-\u074F\u200C\u200D]+"
+ 1 'font-shape-gstring)))
(provide 'misc-lang)