[Emacs-diffs] Changes to emacs/lisp/language/lao-util.el

[Kenichi Handa]

Index: emacs/lisp/language/lao-util.el
diff -c emacs/lisp/language/lao-util.el:1.17 
emacs/lisp/language/lao-util.el:1.18
*** emacs/lisp/language/lao-util.el:1.17        Fri Dec  7 13:18:33 2001
--- emacs/lisp/language/lao-util.el     Mon Oct 28 09:42:53 2002
***************
*** 596,602 ****
  
  The return value is number of composed characters."
    (if (< (1+ from) to)
!       (prog1 (- to from)
        (if string
            (compose-string string from to)
          (compose-region from to))
--- 596,602 ----
  
  The return value is number of composed characters."
    (if (< (1+ from) to)
!       (progn
        (if string
            (compose-string string from to)
          (compose-region from to))