Changeset 9790

Timestamp:

2005-05-02T10:57:25+12:00 (19 years ago)

Author:

kjdon

Message:

fixed a bug in check_contents to do with remove_empty_classifications

File:

• trunk/gsdl/perllib/classify.pm (modified) (1 diff)

trunk/gsdl/perllib/classify.pm

@@ -271 +271 @@
         # found a book
         $num_leaf_docs ++;
-    } elsif (($sub_num_leaf_docs = &check_contents ($content)) > 0) {
+    } elsif (($sub_num_leaf_docs = &check_contents ($content,$remove_empty_classifications)) > 0) {
         # there's a book somewhere below
         $num_leaf_docs += $sub_num_leaf_docs;