From 48302ff95c18a67c55fcce6ccf13e273054791f0 Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@helsinki.at>
Date: Tue, 13 Apr 2010 10:31:35 +0000
Subject: small cleanups


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