From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 1 May 2000 22:20:53 +0000 (+0000)
Subject: Correct Freudian slip.
X-Git-Tag: perl-5.6.1~393^2~22
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/a45d1c963db196562caca890a443b969285f7f76?hp=1883634fcb5674cbb12962bde26d7557a783da9b

Correct Freudian slip.

p4raw-id: //depot/cfgperl@6036
---

diff --git a/pp_sys.c b/pp_sys.c
index 62b4b10..79938fb 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -4788,7 +4788,7 @@ PP(pp_gpwent)
 #   ifdef HAS_GETPWENT
 	pwent  = getpwent();
 #   else
-	DIE(aTHX_ PL_no_fun, "getpwent");
+	DIE(aTHX_ PL_no_func, "getpwent");
 #   endif
 	break;
     }