Add options -q and -v (quiet and verbose) to urpmi.{add,remove}media

1 files changed, 6 insertions, 0 deletions

diff --git a/urpmi.addmedia b/urpmi.addmedia
index 3f66fa4c..ca73dc57 100755
--- a/urpmi.addmedia
+++ b/urpmi.addmedia
@@ -74,6 +74,8 @@ and [options] are from
 ") . N("  --no-md5sum    - disable MD5SUM file checking.
 ") . N("  -c             - clean headers cache directory.
 ") . N("  -f             - force generation of hdlist files.
+") . N("  -q             - quiet mode.
+") . N("  -v             - verbose mode.
 ");
     warn $m ? "$usage\n$m" : $usage;
     exit 0;
@@ -96,11 +98,15 @@ sub main {
     }
     $options{force} = 0;
     $options{noclean} = 1;
+    $options{verbose} = 1;
     $options{probe_with} = 'synthesis'; #- no the default is to probe synthesis file.
     my $urpm = new urpm;
     urpm::args::parse_cmdline(urpm => $urpm);
     our ($name, $url, $with, $relative_hdlist) = our @cmdline;
 
+    #- remove verbose if not asked.
+    $options{verbose} > 0 or $urpm->{log} = sub {};
+
     #- allow not to give name immediately.
     $options{distrib} or $url or ($url, $name) = ($name, '');
     my ($type) = $url =~ m,^([^:]*)://, or $options{distrib} or usage;