(re)added binmode(utf8)

added special return code wich means success with errors

1 files changed, 12 insertions, 2 deletions

diff --git a/rhautoimport-rs b/rhautoimport-rs
index 8143977..d106692 100755
--- a/rhautoimport-rs
+++ b/rhautoimport-rs
@@ -41,6 +41,10 @@ my $RD_GROUP = "radioStimm";
 my $PV_ID = '75';
 my $LAST_RUN = 0;
 
+binmode(STDIN, ":utf8");
+binmode(STDOUT, ":utf8");
+binmode(STDERR, ":utf8");
+
 my $curweek = RHRD::utils::get_rd_week();
 my %week_table = ( 1 => 2, 2 => 6, 3 => 2, 4 => 6 );
 my $nextweek = $curweek == 4 ? 1 : $curweek + 1;
@@ -196,11 +200,17 @@ if($ret) {
 print "\nImport Success:\n\n";
 print $log;
 print "\n";
-rhautoimport::pv_add_note($sum_title, $sum_text, $PV_ID, $id, "1");
+my $exit_code = 0;
+($ret, $log) = rhautoimport::pv_add_note($sum_title, $sum_text, $PV_ID, $id, "1");
+print $log;
+if($ret) {
+  print "\nIgnoring failed note import - manual intervention necessary!\n";
+  $exit_code = 23;
+}
 
 unlink($STAT_FILE);
 open(my $fhs, '>', $STAT_FILE);
 print $fhs "$id\n$file";
 close($fhs);
 
-exit 0;
+exit $exit_code;