From: Steve Peters <steve@fisharerojo.org>
Date: Sat, 18 Nov 2006 05:42:14 +0000 (+0000)
Subject: Sync up the function definitions for Perl_my_popen with the prototype.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7dc3a6bf807591c0f54959a1bd8b2aac442cbc7a;p=p5sagit%2Fp5-mst-13.2.git

Sync up the function definitions for Perl_my_popen with the prototype.

p4raw-id: //depot/perl@29314
---

diff --git a/util.c b/util.c
index d9fde3e..af1e22a 100644
--- a/util.c
+++ b/util.c
@@ -2415,7 +2415,7 @@ Perl_my_popen(pTHX_ const char *cmd, const char *mode)
 #if defined(atarist) || defined(EPOC)
 FILE *popen();
 PerlIO *
-Perl_my_popen(pTHX_ char *cmd, char *mode)
+Perl_my_popen((pTHX_ const char *cmd, const char *mode)
 {
     PERL_FLUSHALL_FOR_CHILD;
     /* Call system's popen() to get a FILE *, then import it.
@@ -2428,7 +2428,7 @@ Perl_my_popen(pTHX_ char *cmd, char *mode)
 #if defined(DJGPP)
 FILE *djgpp_popen();
 PerlIO *
-Perl_my_popen(pTHX_ char *cmd, char *mode)
+Perl_my_popen((pTHX_ const char *cmd, const char *mode)
 {
     PERL_FLUSHALL_FOR_CHILD;
     /* Call system's popen() to get a FILE *, then import it.