Mailing List Archive

commit d145294de3d3bc2230176dd352c458ec65e36476
Author: David Christensen <david@endpoint.com>
Date: Wed Oct 5 14:31:45 2016 -0500

Avoid case issues in charset normalization

lib/Vend/Config.pm | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/lib/Vend/Config.pm b/lib/Vend/Config.pm
index 7b1e6a8..4ae3c3c 100644
--- a/lib/Vend/Config.pm
+++ b/lib/Vend/Config.pm
@@ -3732,7 +3732,7 @@ sub set_defaults {
if ( !$ENV{MINIVEND_DISABLE_UTF8} &&
(my $enc = $C->{Variable}->{MV_HTTP_CHARSET}) ) {
if (my $norm_enc = Vend::CharSet::validate_encoding($enc)) {
- if ($norm_enc ne uc($enc)) {
+ if (uc $norm_enc ne uc($enc)) {
config_warn("Provided MV_HTTP_CHARSET '$enc' resolved to '$norm_enc'. Continuing.");
$C->{Variable}->{MV_HTTP_CHARSET} = $norm_enc;
}

_______________________________________________
interchange-cvs mailing list
interchange-cvs@icdevgroup.org
http://www.icdevgroup.org/mailman/listinfo/interchange-cvs