Commit 933e8d01 authored by Ian Lynagh's avatar Ian Lynagh

Look for -q in the darcs flags as well as the darcs-all flags

parent 56bf6730
......@@ -124,6 +124,8 @@ sub main {
while ($#_ ne -1) {
my $arg = shift;
# We handle -q here as well as lower down as we need to skip over it
# if it comes before the darcs command
if ($arg eq "-q") {
$verbose = 0;
}
......@@ -138,6 +140,9 @@ sub main {
}
else {
unshift @_, $arg;
if (grep /^-q$/, @_) {
$verbose = 0;
}
last;
}
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment