From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 31 Aug 1999 14:47:18 +0000 (+0000)
Subject: \C{} -> \N{} residue.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5777a3f731a65118524923178e82baf60ecf3202;p=p5sagit%2Fp5-mst-13.2.git

\C{} -> \N{} residue.

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

diff --git a/toke.c b/toke.c
index f68e975..c2d51ed 100644
--- a/toke.c
+++ b/toke.c
@@ -1385,13 +1385,13 @@ S_scan_const(pTHX_ char *start)
  		    char *why = Nullch;
  
  		    if (!e) {
-			yyerror("Missing right brace on \\C{}");
+			yyerror("Missing right brace on \\N{}");
 			e = s - 1;
 			goto cont_scan;
 		    }
 		    res = newSVpvn(s + 1, e - s - 1);
 		    res = new_constant( Nullch, 0, "charnames", 
-					res, Nullsv, "\\C{...}" );
+					res, Nullsv, "\\N{...}" );
 		    str = SvPV(res,len);
 		    if (len > e - s + 4) {
 			char *odest = SvPVX(sv);
@@ -1406,7 +1406,7 @@ S_scan_const(pTHX_ char *start)
 		    s = e + 1;
 		}
 		else
-		    yyerror("Missing braces on \\C{}");
+		    yyerror("Missing braces on \\N{}");
 		continue;
 
 	    /* \c is a control character */