summaryrefslogtreecommitdiff
path: root/win32
diff options
context:
space:
mode:
authorDouglas Lankshear <doug@lankshear.net>1998-07-14 00:39:06 -0700
committerGurusamy Sarathy <gsar@cpan.org>1998-07-14 23:47:18 +0000
commit0019749dd7a975b06c3c8b8df4641ab1384cfaf1 (patch)
tree0c60848f81865f6e97222458686ddfdf8661d0ca /win32
parent6bb4e6d4b29a3eb5c60219c3bd690a32ca618ec1 (diff)
downloadperl-0019749dd7a975b06c3c8b8df4641ab1384cfaf1.tar.gz
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
Diffstat (limited to 'win32')
-rw-r--r--win32/win32.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/win32/win32.c b/win32/win32.c
index 7418fcacee..4891c2ea7a 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 {