Changeset 24737 for main/trunk/greenstone2/perllib/classify/BaseClassifier.pm

Timestamp:

2011-10-07T17:29:01+13:00 (13 years ago)

Author:

ak19

Message:

Further adjustment of code, reflecting the fact that text strings read in from files are Unicode aware straight away

File:

• main/trunk/greenstone2/perllib/classify/BaseClassifier.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/classify/BaseClassifier.pm

@@ -279 +279 @@
     
     delete $self->{"info_only"};
-    # user-entered UTF-8 display meta for buttonname. Needs to be internally turned into unicode
-    # (will later be turned back to UTF-8 along with the rest of the metadata)
-    if ($self->{'buttonname'}) {
-        $self->{'buttonname'} = &unicode::convert_utf8_string_to_unicode_string($self->{'buttonname'});
-    }
+
+# The following is no longer needed as we now ensure that when text files are
+# read in, there are straightaway made to be Unicode aware strings in Perl
+    
+#   # user-entered UTF-8 display meta for buttonname. Needs to be internally turned into unicode
+#   # (will later be turned back to UTF-8 along with the rest of the metadata)
+#   if ($self->{'buttonname'}) {
+#       $self->{'buttonname'} = &unicode::convert_utf8_string_to_unicode_string($self->{'buttonname'});
+#   }
     return bless $self, $class;
 }