1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-07 04:10:27 -08:00

(Fsend_string_to_terminal): Use size_byte.

This commit is contained in:
Richard M. Stallman 1998-01-09 23:07:47 +00:00
parent 25638b0794
commit 94f3db6251

View file

@ -2249,12 +2249,13 @@ Control characters in STRING will have terminal-dependent effects.")
(string)
Lisp_Object string;
{
/* ??? Perhaps we should do something special for multibyte strings here. */
CHECK_STRING (string, 0);
fwrite (XSTRING (string)->data, 1, XSTRING (string)->size, stdout);
fwrite (XSTRING (string)->data, 1, XSTRING (string)->size_byte, stdout);
fflush (stdout);
if (termscript)
{
fwrite (XSTRING (string)->data, 1, XSTRING (string)->size, termscript);
fwrite (XSTRING (string)->data, 1, XSTRING (string)->size_byte, termscript);
fflush (termscript);
}
return Qnil;