Changeset 23118

Show
Ignore:
Timestamp:
12.10.2010 13:55:43 (9 years ago)
Author:
kjdon
Message:

removed edit_mode from classobj->classify call

Files:
1 modified

Legend:

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

    r21564 r23118  
    278278# classify_doc lets each of the classifiers classify a document 
    279279sub classify_doc { 
    280     my ($classifiers, $doc_obj, $edit_mode) = @_; 
     280    my ($classifiers, $doc_obj) = @_; 
    281281 
    282282    foreach my $classobj (@$classifiers) { 
    283283    my $title = $classobj->{'title'}; 
    284284 
    285     $classobj->classify($doc_obj,$edit_mode); 
     285    $classobj->classify($doc_obj); 
    286286    } 
    287287} 
     
    355355    # empty contents were made undefined by clean_contents() 
    356356    next unless defined $tempinfo; 
    357      
    358357    if (!defined ($tempinfo->{'classifyOID'}) || 
    359358        $tempinfo->{'classifyOID'} ne "oai") {