Changeset 32077 for main/trunk


Ignore:
Timestamp:
11/21/17 16:02:00 (3 years ago)
Author:
kjdon
Message:

Removed debugging, and added some comments.

File:
1 edited

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
Note: See TracChangeset for help on using the changeset viewer.