diff lisp/language/thai-util.el @ 48043:28c480de4424

(thai-composition-function): Don't use prog1.
author Dave Love <fx@gnu.org>
date Mon, 28 Oct 2002 14:43:33 +0000
parents 68d5182dd369
children 0d8b17d428b5
line wrap: on
line diff
--- a/lisp/language/thai-util.el	Mon Oct 28 14:42:53 2002 +0000
+++ b/lisp/language/thai-util.el	Mon Oct 28 14:43:33 2002 +0000
@@ -286,7 +286,7 @@
 
 The return value is number of composed characters."
   (if (< (1+ from) to)
-      (prog1 (- to from)
+      (progn
 	(if string
 	    (compose-string string from to)
 	  (compose-region from to))