From: Douglas Lankshear <doug@lankshear.net>
Date: Tue, 14 Jul 1998 07:39:06 +0000 (-0700)
Subject: fix off-by-one in win32 registry handling
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0019749dd7a975b06c3c8b8df4641ab1384cfaf1;p=p5sagit%2Fp5-mst-13.2.git

fix off-by-one in win32 registry handling
	Message-ID: <000401bdaf35$27489e80$a32fa8c0@tau.Active>
	Subject: [PATCH 5.004_73]

p4raw-id: //depot/perl@1495
---

diff --git a/win32/win32.c b/win32/win32.c
index 7418fca..4891c2e 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -218,7 +218,7 @@ get_emd_part(char *prev_path, char *trailing_path, ...)
 	oldsize = strlen(prev_path) + 1;
 	newsize += oldsize;			/* includes plus 1 for ';' */
 	Renew(prev_path, newsize, char);
-	prev_path[oldsize] = ';';
+	prev_path[oldsize-1] = ';';
 	strcpy(&prev_path[oldsize], mod_name);
     }
     else {