Changeset 31767

Show
Ignore:
Timestamp:
30.06.2017 11:03:07 (3 months ago)
Author:
kjdon
Message:

added missing closing )

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/classify/List.pm

    r31577 r31767  
    941941    # !! The [0] bits aren't ideal (multiple metadata values) !!  
    942942    @OIDs = @OIDs[ sort { 
    943       if (defined($OID_to_metadata_values_hash_ref->{$OIDs[$a]} && defined($OID_to_metadata_values_hash_ref->{$OIDs[$b]}))) 
     943      if (defined($OID_to_metadata_values_hash_ref->{$OIDs[$a]}) && defined($OID_to_metadata_values_hash_ref->{$OIDs[$b]})) 
    944944      { 
    945945        $OID_to_metadata_values_hash_ref->{$OIDs[$a]}[0] cmp $OID_to_metadata_values_hash_ref->{$OIDs[$b]}[0];