[interchange] Avoid case issues in charset normalization

David Christensen interchange-cvs at icdevgroup.org
Wed Oct 5 19:38:34 UTC 2016


commit d145294de3d3bc2230176dd352c458ec65e36476
Author: David Christensen <david at 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;
             }



More information about the interchange-cvs mailing list