diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-07-19 06:44:27 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-07-19 06:44:27 +0000 |
| commit | 4354e59aa50852a48dc052f8920f7489b25b7752 (patch) | |
| tree | 7ce45965862d59258ebd4409f9d076471c00a456 /win32/perlhost.h | |
| parent | 23acf6821d640f06d65b9a368b9c4101c358376d (diff) | |
| download | perl-4354e59aa50852a48dc052f8920f7489b25b7752.tar.gz | |
Integrate win32/perlhost.h from maintenance branch.
(Rest of $ENV{PATH} / system() fix.)
p4raw-id: //depot/perl@11412
p4raw-integrated: from //depot/maint-5.6/perl@11411 'merge in'
win32/perlhost.h (@11400..)
Diffstat (limited to 'win32/perlhost.h')
| -rw-r--r-- | win32/perlhost.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/win32/perlhost.h b/win32/perlhost.h index 45ce0ddbf9..57f4e31b2c 100644 --- a/win32/perlhost.h +++ b/win32/perlhost.h @@ -2358,7 +2358,7 @@ CPerlHost::Getenv(const char *varname) dTHXo; if (w32_pseudo_id) { char *pEnv = Find(varname); - if (pEnv && !*pEnv) + if (pEnv && *pEnv) return pEnv; } return win32_getenv(varname); |