Changeset 196
- Timestamp:
- 11/07/06 16:59:27 (7 years ago)
- Files:
-
- 3 modified
Legend:
- Unmodified
- Added
- Removed
-
shepherd
r195 r196 1 1 #!/usr/bin/perl -w 2 3 my $version = '0.2.35'; 2 4 3 5 # "Shepherd" … … 21 23 # pass 4: (shepherd) calls postprocessors to postprocess data 22 24 # (e.g. flag HDTV programmes, augment with IMDb etc.) 23 24 my $version = '0.2.34';25 25 26 26 # Changelog: -
status
r193 r196 1 shepherd tv_grab_au 0.3. 32 shepherd shepherd 0.2.3 41 shepherd tv_grab_au 0.3.4 2 shepherd shepherd 0.2.35 3 3 grabber yahoo7widget 1.57 4 4 grabber rex 3.3.6 -
tv_grab_au
r194 r196 1 1 #!/usr/bin/perl -w 2 2 3 my $version = '0.3. 3';3 my $version = '0.3.4'; 4 4 5 5 # tv_grab_au … … 201 201 my $ver = 0; 202 202 203 if ($progtype eq "shepherd") 204 { 205 if (-e "$CWD/$proggy") 206 { 207 $ver = `$CWD/$proggy --version`; 208 chop($ver); 209 } 203 if ($proggy eq 'tv_grab_au') # TEMP: for transition only 204 #if ($progtype eq "application") 205 { 206 $ver = $version; 210 207 } else { 211 208 $ver = $components->{$proggy}->{ver} if (defined $components->{$proggy} and -e ($progtype . "s/$proggy/$proggy")); … … 235 232 my $ldir = query_ldir($proggy, $progtype); 236 233 237 if ($progtype ne " shepherd") {234 if ($progtype ne "application") { 238 235 $rdir = $progtype . "s"; 239 236 -d ("$CWD/$progtype" . "s") … … 271 268 272 269 # if the update was for the main app, restart it 273 if ($progtype eq " shepherd") {270 if ($progtype eq "application") { 274 271 &log("\n*** Restarting ***\n\n"); 275 272 &close_logfile unless $opt->{nolog};
