Changeset 23165


Ignore:
Timestamp:
2010-10-19T11:35:58+13:00 (11 years ago)
Author:
kjdon
Message:

removed a couple of print statements

File:
1 edited

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/basebuildproc.pm

    r23160 r23165  
    393393    my $doctype = $doc_obj->get_doc_type();
    394394    return if ($doctype ne "indexed_doc" && $doctype ne "info_doc");
    395     print STDERR "infodbedit, mode=$edit_mode, ".$doc_obj->get_OID()."\n";
     395   
    396396    my $archivedir = "";
    397397    if (defined $filename)
     
    439439    my $num_reconstructed_bytes = $doc_obj->get_metadata_element ($doc_obj->get_top_section (), "total_numbytes");
    440440    if (defined $num_reconstructed_bytes) {
    441         print STDERR "adding numbytes $num_reconstructed_bytes\n";
    442441        $self->{'num_bytes'} += $num_reconstructed_bytes;
    443442    }
Note: See TracChangeset for help on using the changeset viewer.