diff options
author | Craig A. Berry <craigberry@mac.com> | 2012-02-18 23:06:16 -0600 |
---|---|---|
committer | Craig A. Berry <craigberry@mac.com> | 2012-02-18 23:06:16 -0600 |
commit | 382669a913349a7dde83d66b16de3e20815045f7 (patch) | |
tree | b39fefb298ea97ba7d8be5063ee09f280004a300 | |
parent | 985213f2fede57896814a0d7f5d12b04cc05be5b (diff) | |
download | perl-382669a913349a7dde83d66b16de3e20815045f7.tar.gz |
Fix typo in 985213f2fede57.
Which broke the build on both VMS and Win32.
-rw-r--r-- | mg.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2844,7 +2844,7 @@ Perl_magic_set(pTHX_ SV *sv, MAGIC *mg) (void)setresuid((Uid_t)-1, (Uid_t)new_euid, (Uid_t)-1); #else if (new_euid == PerlProc_getuid()) /* special case $> = $< */ - PerlProc_setuid(my_euid); + PerlProc_setuid(new_euid); else { Perl_croak(aTHX_ "seteuid() not implemented"); } |