From: Kenichi Handa <handa@m17n.org>
Date: Fri, 19 Jan 2001 05:22:51 +0000 (+0000)
Subject: (doprnt1): Get byte length of Lisp string correctly.
X-Git-Tag: emacs-pretest-21.0.96~211
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2d75794b0e9aac019851b45e1a5b2bfe6801f5d3;p=emacs.git

(doprnt1): Get byte length of Lisp string correctly.
---

diff --git a/src/doprnt.c b/src/doprnt.c
index 7bcb6741677..3fd6222c9d7 100644
--- a/src/doprnt.c
+++ b/src/doprnt.c
@@ -240,7 +240,7 @@ doprnt1 (lispstrings, buffer, bufsize, format, format_end, nargs, args)
 	      if (lispstrings)
 		{
 		  string = ((struct Lisp_String *)args[cnt])->data;
-		  tem = ((struct Lisp_String *)args[cnt])->size;
+		  tem = STRING_BYTES ((struct Lisp_String *)args[cnt]);
 		  cnt++;
 		}
 	      else