Changeset 52

Show
Ignore:
Timestamp:
10/09/06 14:52:09 (7 years ago)
Author:
max
Message:

Retrieves grabber config files.

Files:
2 modified

Legend:

Unmodified
Added
Removed

  • shepherd

    r51 r52  
    33# "Shepherd" 
    44 
    5 my $version = '0.2.8'; 
     5my $version = '0.2.9'; 
    66 
    77# A wrapper for various Aussie TV guide data grabbers 
    … …  
    2323# 0.2.7   : Changed online file structure 
    2424# 0.2.8   : Integrated reconciler 
     25# 0.2.9   : Grabber config support 
    2526 
    2627BEGIN { *CORE::GLOBAL::die = \&my_die; } 
    … …  
    12411242    return unless (fetch_file($rfile, $newfile)); 
    12421243     
    1243     # Make it executable 
     1244    # Fetch grabber config file 
     1245    $rfile .= ".conf"; 
     1246    my $config = fetch_file($rfile); 
     1247    return unless ($config); 
     1248 
     1249    eval $config; 
     1250 
     1251    # Make component executable 
    12441252    system('chmod u+x ' . $newfile); 
    12451253 
    … …  
    12671275    $components->{$proggy}->{ver} = $latestversion; 
    12681276    $components->{$proggy}->{ready} = $result; 
     1277    $components->{$proggy}->{config} = $config; 
    12691278    $components->{$proggy}->{laststatus} = sprintf "updated to %s on %s", $latestversion, (strftime "%a%d%b%y",localtime(time)); 
    12701279 

  • status

    r50 r52  
    1 shepherd:0.2.8:shepherd 
    2 rex:3.2.1:grabber 
    3 oztivo:0.4:grabber 
    4 abc_website:1.55:grabber 
    5 abc2_website:1.55:grabber 
    6 yahoo7widget:1.53:grabber 
    7 jrobbo:0.01:grabber 
    8 d1:0.6.2.3:grabber 
     1shepherd:0.2.9:shepherd 
     2rex:3.2.1-r1:grabber 
     3oztivo:0.4-r1:grabber 
     4abc_website:1.55-r1:grabber 
     5abc2_website:1.55-r1:grabber 
     6yahoo7widget:1.53-r1:grabber 
     7jrobbo:0.01-r1:grabber 
     8d1:0.6.2.3-r1:grabber