Changeset 19772
- Timestamp:
- 2009-06-09T14:32:46+12:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/classify.pm
r18520 r19772 281 281 sub classify_doc { 282 282 my ($classifiers, $doc_obj, $edit_mode) = @_; 283 283 284 284 foreach my $classobj (@$classifiers) { 285 285 my $title = $classobj->{'title'}; 286 286 287 $classobj->classify($doc_obj,$edit_mode); 287 288 }
Note:
See TracChangeset
for help on using the changeset viewer.