Fix typo in 985213f2fede57.
authorCraig A. Berry <craigberry@mac.com>
Sun, 19 Feb 2012 05:06:16 +0000 (23:06 -0600)
committerCraig A. Berry <craigberry@mac.com>
Sun, 19 Feb 2012 05:06:16 +0000 (23:06 -0600)
Which broke the build on both VMS and Win32.

mg.c

diff --git a/mg.c b/mg.c
index b8ef4cc..f450d17 100644 (file)
--- a/mg.c
+++ b/mg.c
@@ -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");
        }