/[emacs]/emacs/lisp/language/thai-util.el
ViewVC logotype

Diff of /emacs/lisp/language/thai-util.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.24 by fx, Tue Dec 11 17:59:53 2001 UTC revision 1.24.4.1 by miles, Fri Apr 4 06:20:27 2003 UTC
# Line 265  positions (integers or markers) specifyi Line 265  positions (integers or markers) specifyi
265          (compose-string string idx (match-end 0))          (compose-string string idx (match-end 0))
266          (setq idx (match-end 0)))))          (setq idx (match-end 0)))))
267    string)    string)
268          
269  ;;;###autoload  ;;;###autoload
270  (defun thai-compose-buffer ()  (defun thai-compose-buffer ()
271    "Compose Thai characters in the current buffer."    "Compose Thai characters in the current buffer."
# Line 286  to compose. Line 286  to compose.
286    
287  The return value is number of composed characters."  The return value is number of composed characters."
288    (if (< (1+ from) to)    (if (< (1+ from) to)
289        (prog1 (- to from)        (progn
290          (if string          (if string
291              (compose-string string from to)              (compose-string string from to)
292            (compose-region from to))            (compose-region from to))

Legend:
Removed from v.1.24  
changed lines
  Added in v.1.24.4.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26