From d3db5cfeb8346f308b4354ee1c8970ab9b526472 Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Wed, 19 Feb 2014 17:11:33 -0700 Subject: [PATCH] lib/locale.t: Remove tests that need UTF-8 locale These tests should not be here because they will only match under a UTF-8 locale, which happens to be the case on the machine I developed them on, but not necessarily always true, and so they are failing. Given the deadline is already past, I'm just removing them for now, and will re-add them later in another place in the file where we know we are using a UTF-8 locale. --- lib/locale.t | 9 --------- 1 file changed, 9 deletions(-) diff --git a/lib/locale.t b/lib/locale.t index 4708b58..42dde69 100644 --- a/lib/locale.t +++ b/lib/locale.t @@ -215,15 +215,6 @@ check_taint_not $2, "\t\$2"; /(.)/; # untaint $&, $`, $', $+, $1. check_taint_not $&, "\t/./ \$&"; -"k" =~ /(\N{KELVIN SIGN})/i; # taints because depends on locale -check_taint $&, "\t/(\\N{KELVIN SIGN})/i \$&"; -check_taint $`, "\t\$`"; -check_taint $', "\t\$'"; -check_taint $+, "\t\$+"; -check_taint $1, "\t\$1"; -ok($1 eq 'k', ("\t" x 4) . "\$1 is 'k'"); -check_taint_not $2, "\t\$2"; - /(.)/; # untaint $&, $`, $', $+, $1. check_taint_not $&, "\t/(.)/ \$&"; -- 2.7.4