Changeset 33482

Timestamp:

2019-09-17T10:55:01+12:00 (5 years ago)

Author:

kjdon

Message:

changed standardize_capitalization to use_formatted_metadata_for_bookshelf_display, as this better describes what it is doing

File:

• main/trunk/greenstone2/perllib/classify/List.pm (modified) (3 diffs)

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

@@ -238 +238 @@
        'type' => "regexp"},
       
-      { 'name' => "standardize_capitalization",
-    'desc' => "{List.standardize_capitalization}",
+      { 'name' => "use_formatted_metadata_for_bookshelf_display",
+    'desc' => "{List.use_formatted_metadata_for_bookshelf_display}",
     'type' => "flag"},
       
@@ -579 +579 @@
             
             # add the actual value into the stored values so we can remember the case
-            if (!$self->{'standardize_capitalization'}) {
+            if (!$self->{'use_formatted_metadata_for_bookshelf_display'}) {
                 if (defined $self->{$metadata_group . ".actualvalues"}->{$lc_metadata_value}->{$metadata_value}) {
                 $self->{$metadata_group . ".actualvalues"}->{$lc_metadata_value}->{$metadata_value}++;
@@ -1368 +1368 @@
     my $self = shift(@_);
     my ($metadata_group, $metadata_value) = @_;
-    return $metadata_value if $self->{'standardize_capitalization'};
+    return $metadata_value if $self->{'use_formatted_metadata_for_bookshelf_display'};
     my $actual_values_hash = $self->{$metadata_group . ".actualvalues"}->{$metadata_value};
     my $display_value ="";