From: Gary Houston <ghouston@arglist.com>
Date: Wed, 11 Jul 2001 17:37:53 +0000 (+0000)
Subject: 	* strports.c (st_write): use memcpy, not strncpy.  thanks to
X-Git-Url: http://git.hcoop.net/bpt/guile.git/commitdiff_plain/4b8ec619621a08653ae1742e62e36dc41ab1ef58

	* strports.c (st_write): use memcpy, not strncpy.  thanks to
	Dale P. Smith.
---

diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index 129503036..0ec078395 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,8 @@
+2001-07-11  Gary Houston  <ghouston@arglist.com>
+
+	* strports.c (st_write): use memcpy, not strncpy.  thanks to
+	Dale P. Smith.
+
 2001-07-09  Thien-Thi Nguyen  <ttn@revel.glug.org>
 
 	* alist.c, alloca.c, arbiters.c, async.c, async.h, backtrace.c,
diff --git a/libguile/strports.c b/libguile/strports.c
index 66fc7b52c..969d2b79b 100644
--- a/libguile/strports.c
+++ b/libguile/strports.c
@@ -155,7 +155,7 @@ st_write (SCM port, const void *data, size_t size)
       int space = pt->write_end - pt->write_pos;
       int write_len = (size > space) ? space : size;
       
-      strncpy ((char *) pt->write_pos, input, write_len);
+      memcpy ((char *) pt->write_pos, input, write_len);
       pt->write_pos += write_len;
       size -= write_len;
       input += write_len;