Changeset 12968

Timestamp:

2006-10-03T11:57:07+13:00 (18 years ago)

Author:

kjdon

Message:

now uses incremental option not keepold option

File:

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

trunk/gsdl/perllib/plugin.pm

@@ -72 +72 @@
 sub load_plugins {
     my ($plugin_list) = shift @_;
-    my $keepold;
-    ($verbosity, $outhandle, $failhandle, $globaloptions, $keepold) = @_; # globals
+    my $incremental;
+    ($verbosity, $outhandle, $failhandle, $globaloptions, $incremental) = @_; # globals
     my @plugin_objects = ();
-    $keepold = 0 unless (defined $keepold && $keepold == 1);
+    $incremental = 0 unless (defined $incremental && $incremental == 1);
     $verbosity = 2 unless defined $verbosity;
     $outhandle = 'STDERR' unless defined $outhandle;
@@ -118 +118 @@
     $plugobj->init($verbosity, $outhandle, $failhandle);
     
-    $plugobj->set_keepold($keepold);
+    $plugobj->set_incremental($incremental);
 
     # add this object to the list