diff options
author | Christian Pointner <equinox@helsinki.at> | 2011-07-20 17:26:52 (GMT) |
---|---|---|
committer | Christian Pointner <equinox@helsinki.at> | 2011-07-20 17:26:52 (GMT) |
commit | 372e7a9ebe522d38a493782446caf2b8b2b10231 (patch) | |
tree | 608ef7bed66bce717c4bd421bdd6801d5294303b | |
parent | 69d79bee3b6406eb85a99c60e6fb230c98c02508 (diff) |
removing file after import
git-svn-id: https://svn.helsinki.at/rhimport/trunk@72 7c65635b-ec39-4f67-a626-873dbafdd612
-rwxr-xr-x | rhimport-dn | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rhimport-dn b/rhimport-dn index e19f3b6..ecae29f 100755 --- a/rhimport-dn +++ b/rhimport-dn @@ -101,8 +101,6 @@ for my $entry ($feed->entries) { (-e "$file") or die "file '$file' not found - donwload error?\n"; print "will import $file to dropbox $dropbox (cart=$to_cart)\n\n"; -exit 0; - my $error_cb = sub { my ($text) = @_; @@ -122,6 +120,8 @@ $log .= $import_log; $dbh->disconnect(); +unlink $file + if(!$ret) { exit 1; } |