diff options
author | Christian Pointner <equinox@helsinki.at> | 2016-03-13 00:07:54 (GMT) |
---|---|---|
committer | Christian Pointner <equinox@helsinki.at> | 2016-03-13 00:07:54 (GMT) |
commit | 43000f158817e8a5e5578e52598b6e28d64515b8 (patch) | |
tree | 053eecae72bbaf9d92dcf47a44f8c6136a6ca2d3 /rhautoimport-nw | |
parent | b5c2b5dbabe04b0852e44a7fc526d1b748a2d7b5 (diff) |
tierrechts radio is now tested as well - note will only be set when import was successful
Diffstat (limited to 'rhautoimport-nw')
-rwxr-xr-x | rhautoimport-nw | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/rhautoimport-nw b/rhautoimport-nw index 2fbc9c8..e8f7dd0 100755 --- a/rhautoimport-nw +++ b/rhautoimport-nw @@ -103,7 +103,10 @@ for my $entry ($feed->entries) { $uri = new URI::URL($orig_uri); my @path = $uri->path_components; $file = $path[-1]; - next unless (uc($file) =~ $bdfile); # file not from correct day + unless(uc($file) =~ $bdfile) { # file not from correct day + $uri = ""; + next; + } my $current_file = `cat $STAT_FILE`; if($current_file eq $file) { @@ -121,7 +124,7 @@ for my $entry ($feed->entries) { last; } } - last if $file ne ""; + last if $uri ne ""; } if($uri eq "") { print "No Entry found from $bd - "; |