# New Ticket Created by mrnobo1024
# Please include the string: [perl #22936]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt2/Ticket/Display.html?id=22936 >
msvcrt dosen't have unsetenv(), this patch makes it use the appropriate win32
api call instead.
__________________________________
Do you Yahoo!?
SBC Yahoo! DSL - Now only $29.95 per month!
http://sbc.yahoo.com
-- attachment 1 ------------------------------------------------------
url: http://rt.perl.org/rt2/attach/60663/44899/424939/unsetenv.diff
--- parrot/config/gen/platform/win32.c.orig Fri Jul 11 10:49:46 2003
+++ parrot/config/gen/platform/win32.c Sun Jul 13 15:41:02 2003
@@ -68,7 +68,7 @@
void
Parrot_unsetenv(const char *name)
{
- unsetenv(name);
+ SetEnvironmentVariable(name, NULL);
}
/*
** Parrot_dlopen()
