From 933e8d0116097567ff05e45713da0dbd57899fe1 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Mon, 30 Apr 2007 10:16:12 +0000 Subject: [PATCH] Look for -q in the darcs flags as well as the darcs-all flags --- darcs-all | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/darcs-all b/darcs-all index 70cf165..4e67683 100644 --- a/darcs-all +++ b/darcs-all @@ -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; } } -- 1.7.10.4