Changeset 394

Timestamp:

12/29/06 18:25:51 (6 years ago)

Author:

max

Message:

Added undocumented option --grabwith to temporarily specify grabber order

Files:

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

applications/shepherd

@@ -2 +2 @@
 
 my $progname = 'shepherd';
-my $version = '0.4.21';
+my $version = '0.4.22';
 
 # tv_grab_au
@@ -1162 +1162 @@
                         randomize
                         pending
+                        grabwith=s
                      ));
   $debug = $opt->{debug};
@@ -1867 +1868 @@
     }
 
+    if ($opt->{grabwith})
+    {
+        my @a = split(/,/, $opt->{grabwith});
+        my $g;
+        while ($g = shift @a)
+        {
+            $opt->{grabwith} = (@a ? join(',', @a) : undef);
+            &log("\nObeying --grabwith option: selecting grabber \"$g\".\n");
+            if ($components->{$g} and $components->{$g}->{type} eq 'grabber')
+            {
+                return select_grabber($g, $gscore);
+            }
+            &log("Not a grabber: \"$g\".\n");
+        }
+    }
+
     return undef unless ($total);
 

status

@@ -1 @@
-application     shepherd            0.4.21
+application     shepherd            0.4.22
 grabber         yahoo7widget        1.71
 grabber         rex                 3.3.8