Changeset 32077 for main/trunk

Show
Ignore:
Timestamp:
21.11.2017 16:02:00 (23 months ago)
Author:
kjdon
Message:

Removed debugging, and added some comments.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/cgiactions/modmetadataaction.pm

    r32076 r32077  
    840840 
    841841    my $curr_secnum = $parser->{'parameters'}->{'curr_section_num'}; 
    842     print STDERR "**** checking $opt_doc_secnum <=> $curr_secnum\n" if (defined $opt_doc_secnum); 
    843    print STDERR "**** metamode = $metamode\n"; 
     842##    print STDERR "**** checking $opt_doc_secnum <=> $curr_secnum\n" if (defined $opt_doc_secnum); 
     843##    print STDERR "**** metamode = $metamode\n"; 
    844844     
    845845    if ((!defined $opt_doc_secnum) || ($opt_doc_secnum eq $curr_secnum))  
    846846    { 
    847847        my $name_attr = $attrHash->{'name'}; 
    848         print STDOUT "*** testing: $name_attr eq $metaname ?   and  $metamode eq override ?\n"; 
     848        # print STDOUT "*** testing: $name_attr eq $metaname ?   and  $metamode eq override ?\n"; 
    849849        if (($name_attr eq $metaname) && ($metamode eq "override"))  
    850850        { 
     
    858858            }  
    859859             
    860             if (defined $parser->{'parameters'}->{'metapos'}) { 
     860            if (defined $parser->{'parameters'}->{'metapos'}) { # if pos defined, ignore any prevmeta if also defined, and just wait for pos match 
    861861 
    862862                if ($parser->{'parameters'}->{'poscount'} == $parser->{'parameters'}->{'metapos'}) { 
     
    870870                } 
    871871            } 
    872             elsif (defined $parser->{'parameters'}->{'prevmetavalue'}) { 
     872            elsif (defined $parser->{'parameters'}->{'prevmetavalue'}) { # if no pos defined but prevmeta defined, then wait for prevmeta match 
    873873                if ($parser->{'parameters'}->{'prevmetavalue'} eq $attrHash->{'_content'}) { 
    874874                print STDERR "### prev meta value matches\n"; 
     
    879879                } 
    880880            } 
    881             elsif ($parser->{'parameters'}->{'poscount'} == 0) { # explicit catch all 
     881            elsif ($parser->{'parameters'}->{'poscount'} == 0) { # explicit catch all - ignored!!!!  
     882                # If no pos or prevmeta defined, then metavalue set for metaname becomes the ONLY instance of that metaname!!! 
    882883                print STDERR "#### got pos match!!\n"; 
    883884                # Get the value and override the current value