implement failure-dependent exit statuses, ask to proceed if a failure is encountered during the process

1 files changed, 7 insertions, 2 deletions

diff --git a/sboupgrade b/sboupgrade
index b38b456..e072850 100755
--- a/sboupgrade
+++ b/sboupgrade
@@ -213,7 +213,7 @@ unless ($non_int) {
     exit 0 unless <STDIN> =~ /^[Yy\n]/;
 }
 
-my $failures = process_sbos(
+my ($failures, $exit) = process_sbos(
 	TODO		=> $upgrade_queue,
 	CMDS		=> \%commands,
 	OPTS		=> \%options,
@@ -222,7 +222,12 @@ my $failures = process_sbos(
 	NOINSTALL	=> $no_install,
 	NOCLEAN		=> $noclean,
 	DISTCLEAN	=> $distclean,
+	NON_INT		=> $non_int,
 );
 print_failures($failures);
 
-exit keys %$failures > 0 ? 1 : 0;
+if ($exit) {
+	exit $exit;
+} else {
+	exit 0;
+}