minor cleanups

1 files changed, 4 insertions, 4 deletions

diff --git a/rhautoimport-er b/rhautoimport-er
index 90577c9..34b431d 100755
--- a/rhautoimport-er
+++ b/rhautoimport-er
@@ -29,8 +29,8 @@ use XML::Feed::Content;
 use XML::Feed::Enclosure;
 use URI::URL;
 use HTML::Entities;
+use RHRD::utils;
 
-use lib '../rhrdlibs/lib';
 use lib '/usr/local/share/rhautoimport/';
 use rhautoimport;
 
@@ -59,7 +59,7 @@ if(!defined $allowed_dbs[0] && defined $allowed_dbs[1]) {
 }
 
 if(scalar(@allowed_dbs) != 1) {
-  print "found more or less than 1 Dropbox for this group?!\n";
+  print "found more or less than one Dropbox for this group?!\n";
   exit 1;
 }
 my $show_id = $allowed_dbs[0]->{'SHOWID'};
@@ -68,8 +68,6 @@ my $show_title = $allowed_dbs[0]->{'SHOWTITLE'};
 my $curweek = RHRD::utils::get_rd_week();
 
 my @today = Date::Calc::Today();
-print "today: " . Date::Calc::Date_to_Text(@today) . " (Week: " . $curweek . ")\n";
-
 my @import_date = Date::Calc::Standard_to_Business(@today);
 $import_date[2] = 5;
 @import_date = Date::Calc::Business_to_Standard(@import_date);
@@ -84,6 +82,8 @@ if($curweek == 1 || $curweek == 3) {
 }
 my $broadcast_num = `cat $LAST_FILE`;
 $broadcast_num += 1;
+
+print "today: " . Date::Calc::Date_to_Text(@today) . " (Week: " . $curweek . ")\n";
 print "day of next Radio Helsinki broadcast: " . Date::Calc::Date_to_Text(@import_date) . "\n";
 print "Number of next broadcast: " . $broadcast_num . "\n\n";