mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-04 11:00:45 -08:00
Code Issues Projects Releases Wiki Activity

(lao-compose-region): New function.

Browse source
This commit is contained in:
Kenichi Handa 2000-05-03 03:28:39 +00:00
parent ffec4d9fa7
commit 9b21ecc23f
1 changed files with 10 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/language/lao-util.el
View file

@ -505,6 +505,16 @@ The return value is number of composed characters."
(compose-region from to))
(- to from))))
;;;###autoload
(defun lao-compose-region (from to)
(interactive "r")
(save-restriction
(narrow-to-region from to)
(goto-char (point-min))
(with-category-table lao-category-table
(while (re-search-forward lao-composition-pattern nil t)
(compose-region (match-beginning 0) (point))))))
;;
(provide 'lao-util)