Added --quiet option

Leont · Dec 28, 2010 · d0e34dc · d0e34dc
1 parent 131ec2a
commit d0e34dc
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/inc/Library/Build.pm b/inc/Library/Build.pm
@@ -26,7 +26,13 @@ sub new {
 	}
 	bless $self, $new_class;
 	$self->stash(verbose => 0);
-	$self->register_argument(verbose => 0);
+	$self->register_argument(
+		verbose => 0,
+		quiet   => sub () {
+			my $options = shift;
+			$options->{verbose}--;
+		},
+	);
 	return $self;
 }