Changeset 12972

Timestamp:

2006-10-03T12:00:38+13:00 (18 years ago)

Author:

kjdon

Message:

now has incremental and incremental_dlc argument to new()

File:

• trunk/gsdl/perllib/basebuilder.pm (modified) (2 diffs)

trunk/gsdl/perllib/basebuilder.pm

@@ -49 +49 @@
 sub new {
     my ($class, $collection, $source_dir, $build_dir, $verbosity, 
-    $maxdocs, $debug, $keepold, $remove_empty_classifications, 
+    $maxdocs, $debug, $keepold, $incremental, $incremental_dlc,
+    $remove_empty_classifications, 
     $outhandle, $no_text, $failhandle, $gli) = @_;
 
@@ -64 +65 @@
               'debug'=>$debug,
               'keepold'=>$keepold,
+              'incremental'=>$incremental,
+              'incremental_dlc' => $incremental_dlc,
               'remove_empty_classifications'=>$remove_empty_classifications,
               'outhandle'=>$outhandle,