implement skip on inputs

git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@1160 07558da8-63fa-0310-ba24-9fe276d99e06

diff --git a/run.pl b/run.pl
index 01d3e77..f048ca9 100755 (executable)
--- a/run.pl
+++ b/run.pl
@@ -371,6 +371,11 @@ foreach my $database ( sort keys %{ $config->databases } ) {
 
                my $input_name = $input->{name} || $log->logdie("input without a name isn't valid: ",dump($input));
 
+               if ( $input->{skip} ) {
+                       $log->info("skip $input_name");
+                       next;
+               }
+
                next if ($only_input && ($input_name !~ m#$only_input#i && $input->{type} !~ m#$only_input#i));
 
                my $type = lc($input->{type});