Add an option to discard generated packages

1 files changed, 4 insertions, 1 deletions

diff --git a/iurt b/iurt
index f183be8..563e917 100755
--- a/iurt
+++ b/iurt
@@ -267,6 +267,9 @@ $run{todo} = [];
     [ "", "delete-on-success", 0, "",
     "Don't keep generated packages and their logs",
     sub { $run{delete_on_success} = 1 }, "Setting the delete on success flag" ],
+    [ "", "discard-packages", 0, "",
+    "Don't save built packages, only keep the logs",
+    sub { $run{discard_packages} = 1 }, "Setting the discard packages flag" ],
     [ "v", "verbose", 1, "<verbose level>", 
     "Give more info messages about what is going on (level from 1 to 10)", 
     sub { $run{verbose} = $_[0]; 1 }, "Setting verbose level" ],
@@ -963,7 +966,7 @@ retry:
 	# drop packages and logs if we only want failure logs
 	if ($run{delete_on_success}) {
 	    system("rm -rf $local_spool/log/$srpm/");
-	} else {
+	} elsif (!$run{discard_packages}) {
 	    plog('OK', "build successful, copying packages to $local_spool.");
 	    
 	    system("cp $chroot_tmp/home/$luser/rpmbuild/RPMS/*/*.rpm $local_spool &>/dev/null") and plog('ERROR', "ERROR: could not copy rpm files from $chroot_tmp/home/$luser/rpmbuild/RPMS/ to $local_spool ($!)");