Index: external/mit/xedit/dist/lisp/pathname.c
===================================================================
RCS file: /cvsroot/xsrc/external/mit/xedit/dist/lisp/pathname.c,v
retrieving revision 1.1.1.2
diff -u -r1.1.1.2 pathname.c
--- external/mit/xedit/dist/lisp/pathname.c	19 Jul 2015 19:37:31 -0000	1.1.1.2
+++ external/mit/xedit/dist/lisp/pathname.c	22 Oct 2019 22:00:29 -0000
@@ -1070,8 +1070,9 @@
     length = 0;
     if (home) {
 	length = strlen(home);
-	strncpy(data, home, length);
-	if (length && home[length - 1] != PATH_SEP)
+	length = MIN(length, sizeof(data));
+	memcpy(data, home, length);
+	if (length && home[length - 1] != PATH_SEP && length < (sizeof(data) - 1))
 	    data[length++] = PATH_SEP;
     }
     data[length] = '\0';