Changeset 279

Timestamp:

11/22/06 18:39:09 (7 years ago)

Author:

lincoln

Message:

[278] didn't quite cut it

Files:

• applications/shepherd (modified) (3 diffs)
• status (modified) (1 diff)

applications/shepherd

@@ -3 +3 @@
 my $myprogname = 'shepherd';
 my $progname = 'shepherd';
-my $version = '0.3.24';
+my $version = '0.3.25';
 
 # tv_grab_au
@@ -813 +813 @@
   # Record so we can pass the unmodified args to components later
   @options = @ARGV;     # Record so we can pass the unmodified args to components later
-  @options = grep(!/quiet/, @options);
   push (@options,"") if ($#options == -1); # silence warnings if none
+
+  # filter what options we don't pass on ..
+  foreach (0..$#options) {
+    splice(@options,$_,2) if ($options[$_] =~ /^--config-file/); # don't pass on --config-file
+    splice(@options,$_,1) if ($options[$_] =~ /^--quiet/);      # never be quiet
+  }
 
   Getopt::Long::Configure(qw/pass_through/);
@@ -840 +845 @@
                      ));
   $debug = $opt->{debug};
-
-  # ignore (and don't pass on) what mythfilldatabase passes to us as a --config-file
-  @options = grep(!/^config-file/, @options);
 }
 

status

@@ -1 @@
-application     shepherd            0.3.24
+application     shepherd            0.3.25
 engine          dog                 0.3.12
 grabber         yahoo7widget        1.58-r1