diff options
| author | Peter Prymmer <PPrymmer@factset.com> | 2000-10-03 05:05:59 -0700 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-10-03 21:49:49 +0000 |
| commit | e020c87d6f7ea3827bebbe7b39b6e63992dab130 (patch) | |
| tree | b833c6a2015d7e049396d099a3ee7193149def42 /pp_sys.c | |
| parent | f2f25442824dfab9d0a91dc070009f87264b362c (diff) | |
| download | perl-e020c87d6f7ea3827bebbe7b39b6e63992dab130.tar.gz | |
PWPASSWD problem for passwd less pwd's
Message-ID: <Pine.OSF.4.10.10010031203470.388222-100000@aspara.forte.com>
p4raw-id: //depot/perl@7138
Diffstat (limited to 'pp_sys.c')
| -rw-r--r-- | pp_sys.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -4972,8 +4972,10 @@ PP(pp_gpwent) sv_setpv(sv, spwent->sp_pwdp); } # endif +# ifdef PWPASSWD if (!SvPOK(sv)) /* Use the standard password, then. */ sv_setpv(sv, pwent->pw_passwd); +# endif # ifndef INCOMPLETE_TAINTS /* passwd is tainted because user himself can diddle with it. |