Add an option to urpmi, --expect-install, that tells urpmi to return with

an exit status of 15 if it installed nothing.

1 files changed, 5 insertions, 4 deletions

diff --git a/urpmi b/urpmi
index 14c36b56..82dccd0c 100755
--- a/urpmi
+++ b/urpmi
@@ -215,7 +215,7 @@ if ($env) {
     }
 }
 
-unless ($bug || $install_src || $env || $urpm->{options}{'allow-force'}) {
+unless ($bug || $install_src || $env || $urpm->{options}{'allow-force'} || $root) {
     require urpm::sys;
     urpm::sys::check_fs_writable() or $urpm->{fatal}(1, N("Error: %s appears to be mounted read-only.
 Use --allow-force to force operation.", $urpm::sys::mountpoint));
@@ -684,9 +684,10 @@ if ($nok) {
     if ($test) {
 	message(N("Installation is possible"));
     } elsif (@names || @src_names || @files || @src_files || $auto_select) {
-	@{$state->{transaction} || []} == 0 && @ask_unselect == 0 && $verbose >= 0
-	    and message(N("The package(s) are already installed"));
-	$exit_code = 15;
+	if (@{$state->{transaction} || []} == 0 && @ask_unselect == 0) {
+	    message(N("The package(s) are already installed")) if $verbose >= 0;
+	    $exit_code = 15 if our $expect_install;
+	}
     }
 }