Changeset 23165

Show
Ignore:
Timestamp:
19.10.2010 11:35:58 (9 years ago)
Author:
kjdon
Message:

removed a couple of print statements

Files:
1 modified

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    }