From: W. Phillip Moore <wpm@ms.com>
Date: Tue, 5 Jan 1999 12:40:27 +0000 (-0500)
Subject: POSIX getpgrp is not -w clean
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5507c093461a5bb63a4cc7e16e5a935c61c49879;p=p5sagit%2Fp5-mst-13.2.git

POSIX getpgrp is not -w clean

To: perlbug@perl.org
Message-ID: <13970.20107.190314.549471@zappa>

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

diff --git a/ext/POSIX/POSIX.pm b/ext/POSIX/POSIX.pm
index 8687eb8..76455f7 100644
--- a/ext/POSIX/POSIX.pm
+++ b/ext/POSIX/POSIX.pm
@@ -866,7 +866,7 @@ sub getlogin {
 
 sub getpgrp {
     usage "getpgrp()" if @_ != 0;
-    CORE::getpgrp($_[0]);
+    CORE::getpgrp;
 }
 
 sub getpid {