diff options
| author | Paul Marquess <paul.marquess@btinternet.com> | 2002-03-20 22:56:17 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-20 21:57:22 +0000 |
| commit | f98bc0c60b037c4df60741a875da49b98d04509c (patch) | |
| tree | 9764fb451b55c02c50d715d2df803b638010b23a /djgpp | |
| parent | a634c1702b9b72e0d5017b79d9c7d13ca05c52b9 (diff) | |
| download | perl-f98bc0c60b037c4df60741a875da49b98d04509c.tar.gz | |
From: "Paul Marquess" <paul_marquess@yahoo.co.uk>
Message-ID: <AIEAJICLCBDNAAOLLOKLEEEAEAAA.paul_marquess@yahoo.co.uk>
packWARN also for subdirs.
p4raw-id: //depot/perl@15378
Diffstat (limited to 'djgpp')
| -rw-r--r-- | djgpp/djgpp.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/djgpp/djgpp.c b/djgpp/djgpp.c index 6aa290ec53..d770cefb96 100644 --- a/djgpp/djgpp.c +++ b/djgpp/djgpp.c @@ -106,7 +106,7 @@ static int convretcode (pTHX_ int rc,char *prog,int fl) { if (rc < 0 && ckWARN(WARN_EXEC)) - Perl_warner(aTHX_ WARN_EXEC,"Can't %s \"%s\": %s", + Perl_warner(aTHX_ packWARN(WARN_EXEC),"Can't %s \"%s\": %s", fl ? "exec" : "spawn",prog,Strerror (errno)); if (rc >= 0) return rc << 8; |