summaryrefslogtreecommitdiff
path: root/rhautoimport-nw
diff options
context:
space:
mode:
authorChristian Pointner <equinox@helsinki.at>2016-03-13 00:07:54 (GMT)
committerChristian Pointner <equinox@helsinki.at>2016-03-13 00:07:54 (GMT)
commit43000f158817e8a5e5578e52598b6e28d64515b8 (patch)
tree053eecae72bbaf9d92dcf47a44f8c6136a6ca2d3 /rhautoimport-nw
parentb5c2b5dbabe04b0852e44a7fc526d1b748a2d7b5 (diff)
tierrechts radio is now tested as well - note will only be set when import was successful
Diffstat (limited to 'rhautoimport-nw')
-rwxr-xr-xrhautoimport-nw7
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 - ";