From 42a3dd3a0948c6ac1b200a3fbb116cc84a1b090e Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Tue, 11 Oct 2005 21:14:49 +0000 Subject: Comment fix p4raw-id: //depot/perl@25738 --- perl.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl.c') diff --git a/perl.c b/perl.c index 72289a2f8a..a1667c8404 100644 --- a/perl.c +++ b/perl.c @@ -4594,8 +4594,8 @@ S_init_perllib(pTHX) s = PerlEnv_getenv("PERL5LIB"); /* * It isn't possible to delete an environment variable with - * PERL_USE_SAFE_PUTENV set unless setenv() is also available, so in that case - * we treat PERL5LIB as undefined if it has a zero-length value. + * PERL_USE_SAFE_PUTENV set unless unsetenv() is also available, so in that + * case we treat PERL5LIB as undefined if it has a zero-length value. */ #if defined(PERL_USE_SAFE_PUTENV) && ! defined(HAS_UNSETENV) if (s && *s != '\0') -- cgit v1.2.1