summaryrefslogtreecommitdiff
path: root/rhautoimport-dn
diff options
context:
space:
mode:
Diffstat (limited to 'rhautoimport-dn')
-rwxr-xr-xrhautoimport-dn17
1 files changed, 15 insertions, 2 deletions
diff --git a/rhautoimport-dn b/rhautoimport-dn
index 62ba332..c9ff637 100755
--- a/rhautoimport-dn
+++ b/rhautoimport-dn
@@ -40,6 +40,10 @@ my $RD_GROUP = "democracyn";
my $PV_ID = '111';
my $LAST_RUN = 0;
+binmode(STDIN, ":utf8");
+binmode(STDOUT, ":utf8");
+binmode(STDERR, ":utf8");
+
if($#ARGV >= 0 && $ARGV[0] eq 'last') {
print "!!!This is the last attempt, there won't be a retry on error!!!\n";
$LAST_RUN = 1;
@@ -154,6 +158,7 @@ for my $entry ($headlines_feed->entries) {
print "\n\nwill import '$uri' to show $show_id, $show_title\n\n";
+my $exit_code = 0;
my ($ret, $log) = rhautoimport::import_uri($show_id, $uri->as_string);
if($ret) {
print "\nImport Error:\n\n";
@@ -165,7 +170,15 @@ print "\nImport Success:\n\n";
print $log;
if($sum_title ne "") {
print "\n";
- rhautoimport::pv_add_note($sum_title, $sum_text, $PV_ID, sprintf("%04d-%02d-%02d", @import_day), "1", 0);
+ ($ret, $log) = rhautoimport::pv_add_note($sum_title, $sum_text, $PV_ID, sprintf("%04d-%02d-%02d", @import_day), "1", 0);
+ print $log;
+ if($ret) {
+ print "\nIgnoring failed note import - manual intervention necessary!\n";
+ $exit_code = 23;
+ }
+} else {
+ print "\nIgnoring missing note - manual intervention necessary!\n";
+ $exit_code = 23;
}
unlink($STAT_FILE);
@@ -173,4 +186,4 @@ open(my $fhs, '>', $STAT_FILE);
print $fhs $file;
close($fhs);
-exit 0;
+exit $exit_code;