From 861a34f92f7871ff14e15b24ea202a70c34607c4 Mon Sep 17 00:00:00 2001 From: Christian Pointner Date: Tue, 13 Apr 2010 10:31:35 +0000 Subject: small cleanups git-svn-id: https://svn.helsinki.at/rhimport/trunk@42 7c65635b-ec39-4f67-a626-873dbafdd612 diff --git a/rhimport.pm b/rhimport.pm index d33640d..48b5b17 100644 --- a/rhimport.pm +++ b/rhimport.pm @@ -118,7 +118,6 @@ sub clear_carts my $sth = $dbh->prepare($sql); $sth->execute(); while(my $cut_name = $sth->fetchrow_array()) { -## TODO: Error handling would be nice! delete_file("/var/snd/$cut_name.wav"); } $sth->finish(); @@ -162,7 +161,7 @@ sub import_playlist my $out; ($ret, $out) = import_file($entry, $dropbox, $error_cb); - $log .= "\n--- $entry ---\n$out\n"; + $log .= "\n--- $entry ---\n$out\n" if $out; last if($ret == 0); $cnt++; -- cgit v0.10.2