Changeset 25103

Show
Ignore:
Timestamp:
20.02.2012 15:59:08 (8 years ago)
Author:
sjm84
Message:

Removed some debug statements

Files:
1 modified

Legend:

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

    r25102 r25103  
    724724sub dxml_metadata 
    725725{ 
    726     print STDERR "IN dxml_metadata\n"; 
    727726    my ($tagname, $attrHash, $contextArray, $parentDataArray, $parser) = @_; 
    728727    my $metaname = $parser->{'parameters'}->{'metaname'}; 
     
    782781sub dxml_description 
    783782{ 
    784     print STDERR "IN dxml_description\n"; 
    785783    my ($tagname, $attrHash, $contextArray, $parentDataArray, $parser) = @_; 
    786784    my $metamode = $parser->{'parameters'}->{'metamode'}; 
     
    818816sub dxml_start_section 
    819817{ 
    820     print STDERR "IN DXML_START_SECTION\n"; 
    821818    my ($tagname, $attrHash, $contextArray, $parentDataArray, $parser) = @_; 
    822819 
     
    858855sub edit_xml_file 
    859856{ 
    860     print STDERR "IN EDIT XML FILE\n"; 
    861857    my $self = shift @_; 
    862858    my ($gsdl_cgi, $filename, $start_rules, $rules, $options) = @_; 
     
    900896sub edit_doc_xml 
    901897{ 
    902     print STDERR "IN EDIT DOC XML\n"; 
    903898    my $self = shift @_; 
    904899    my ($gsdl_cgi, $doc_xml_filename, $metaname, $metavalue, $metapos, $metamode, $opt_secnum, $prevmetavalue) = @_; 
     
    931926sub set_archives_metadata_entry 
    932927{ 
    933     print STDERR "IN SET ARCHIVES ENTRY\n"; 
    934928    my $self = shift @_; 
    935929    my ($gsdl_cgi,$archive_dir, $collect_dir,$collect, $infodbtype,$docid,$metaname,$metapos,$metavalue,$metamode,$prevmetavalue) = @_; 
     
    961955sub set_archives_metadata 
    962956{ 
    963     print STDERR "IN SET ARCHIVES\n"; 
    964957    my $self = shift @_; 
    965958