diff options
author | Christian Pointner <equinox@helsinki.at> | 2014-06-20 18:04:34 (GMT) |
---|---|---|
committer | Christian Pointner <equinox@helsinki.at> | 2014-06-20 18:04:34 (GMT) |
commit | 98a1be65db273fbf949b50909a0700ffda7b71fd (patch) | |
tree | 0e885b255c2becfbfbba8231efd9368843936f30 /rhimport-oi | |
parent | bad34ad0166f03e753905aae1bbe1cdea2d9c4f8 (diff) |
added extension check to all autoimports
Diffstat (limited to 'rhimport-oi')
-rwxr-xr-x | rhimport-oi | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/rhimport-oi b/rhimport-oi index d596c0b..a08490d 100755 --- a/rhimport-oi +++ b/rhimport-oi @@ -113,6 +113,12 @@ for my $entry ($feed->entries) { my $ff = File::Fetch->new(uri => $entry->enclosure->url); $out_file = $ff->output_file; + if(!rhimport::check_file_extension($out_file)) { + print "\n\nThe extension of the matching file '". $out_file . "' seems to be wrong - manual import necessary!!!\n"; + $dbh->disconnect(); + exit 1; + } + print $broadcast_num . ": downloading " . $entry->enclosure->url . " (" . $entry->enclosure->length . " Bytes) .. "; $file = $ff->fetch( to => '/tmp' ) or die $ff->error; print "ok\n"; |