[Module-build-checkins] Module-Build/lib/Module/Build Base.pm,1.373,1.374

[Ken W. <kwi...@us...>]

Update of /cvsroot/module-build/Module-Build/lib/Module/Build
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10224/lib/Module/Build

Modified Files:
	Base.pm 
Log Message:
Add a 'quiet' parameter that silences 'info' messages

Index: Base.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v
retrieving revision 1.373
retrieving revision 1.374
diff -u -d -r1.373 -r1.374
--- Base.pm	7 Jan 2005 11:08:57 -0000	1.373
+++ Base.pm	10 Jan 2005 04:24:23 -0000	1.374
@@ -120,7 +120,7 @@
 
 ################## End constructors #########################
 
-sub log_info { shift; print @_; }
+sub log_info { print @_ unless shift()->quiet }
 sub log_warn { shift; Carp::carp @_; }
 sub log_verbose { shift()->log_info(@_) if $_[0]->verbose }
 
@@ -570,6 +570,7 @@
    bindoc_dirs
    libdoc_dirs
    get_options
+   quiet
 );
 
 sub mb_parents {