From: Mark-Jason Dominus <mjd@plover.com>
Date: Sun, 20 Dec 1998 14:35:20 +0000 (-0500)
Subject: To: perl5-porters@perl.com
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=752ebe844985bd7c7f424795c73df4c551117eba;p=p5sagit%2Fp5-mst-13.2.git

To: perl5-porters@perl.com
Subject: PATCH (5.005_02): Dejargonizing
Date: Sun, 20 Dec 1998 14:35:20 -0500
Message-ID: <19981220193520.11230.qmail@plover.com>

From: Mark-Jason Dominus <mjd@plover.com>
To: perl5-porters@perl.com
Subject: PATCH (5.005_02): Spelling correction in warning message
Date: Sun, 20 Dec 1998 13:51:30 -0500
Message-ID: <19981220185130.11067.qmail@plover.com>

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

diff --git a/doio.c b/doio.c
index c7c6455..08577a9 100644
--- a/doio.c
+++ b/doio.c
@@ -470,7 +470,7 @@ nextargv(register GV *gv)
                       || (_djstat_fail_bits & _STFAIL_TRUENAME)!=0
 #endif
                       ) {
-			warn("Can't do inplace edit: %s would not be uniq",
+			warn("Can't do inplace edit: %s would not be unique",
 			  SvPVX(sv) );
 			do_close(gv,FALSE);
 			continue;
diff --git a/op.c b/op.c
index e82a45c..003614e 100644
--- a/op.c
+++ b/op.c
@@ -1709,7 +1709,7 @@ localize(OP *o, I32 lex)
 	    char *s;
 	    for (s = PL_bufptr; *s && (isALNUM(*s) || (*s & 0x80) || strchr("@$%, ",*s)); s++) ;
 	    if (*s == ';' || *s == '=')
-		warner(WARN_PARENTHESIS, "Parens missing around \"%s\" list",
+		warner(WARN_PARENTHESIS, "Parentheses missing around \"%s\" list",
 				lex ? "my" : "local");
 	}
     }