# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 979947486 0
# Node ID 21817d18668c63648aa9705f705c9738b708df5b
# Parent  e233950d5d07f56b3b79972c70d7bd8a1cd5af59
(Fformat): Use lisp_string_width instead of strwidth.

diff -r e233950d5d07 -r 21817d18668c src/editfns.c
--- a/src/editfns.c	Fri Jan 19 23:37:52 2001 +0000
+++ b/src/editfns.c	Fri Jan 19 23:38:06 2001 +0000
@@ -3311,8 +3311,7 @@
 	  if (STRINGP (args[n]))
 	    {
 	      int padding, nbytes;
-	      int width = strwidth (XSTRING (args[n])->data,
-				    STRING_BYTES (XSTRING (args[n])));
+	      int width = lisp_string_width (args[n], -1, NULL, NULL);
 	      int start = nchars;
 
 	      /* If spec requires it, pad on right with spaces.  */