From 9c9bd5858bb1ba0716ce72cfed56b41e34126686 Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Fri, 24 Oct 2014 11:54:15 -0600 Subject: t/uni/variables.t: Fix typo This caused failures only in EBCDIC. The variable $chr is what was intended, but due to a missing '$', we got the variable $_ which differs from $chr only on EBCDIC. --- t/uni/variables.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 't/uni') diff --git a/t/uni/variables.t b/t/uni/variables.t index 5ccf7e7f66..475196c258 100644 --- a/t/uni/variables.t +++ b/t/uni/variables.t @@ -136,7 +136,7 @@ for ( 0x0 .. 0xff ) { "$name as a length-1 variable generates a syntax error"); $tests++; } - elsif ($ord < 32 || chr =~ /[[:punct:][:digit:]]/a) { + elsif ($ord < 32 || $chr =~ /[[:punct:][:digit:]]/a) { # Unlike other variables, we dare not try setting the length-1 # variables that are \cX (for all valid X) nor ASCII ones that are -- cgit v1.2.1