From dbde8d47ee9bd3a0012be51d88c2bfc5790852e4 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?David=20Pr=C3=A9vot?= Date: Tue, 3 May 2011 18:39:46 +0000 Subject: Add a quiet option for non existing files CVS version numbers remove_stale.pl: 1.20 -> 1.21 Perl/Local/VCS_CVS.pm: 1.11 -> 1.12 --- remove_stale.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'remove_stale.pl') diff --git a/remove_stale.pl b/remove_stale.pl index 565719e98fa..970480f7a64 100755 --- a/remove_stale.pl +++ b/remove_stale.pl @@ -150,7 +150,7 @@ sub find_stale_files my $haswml = exists( $wmlfiles{$source} ) || -f $source || 0; # is the html file checked in the VCS? - my $checkedin = vcs_file_info($htmlfile) ? 1 : 0; + my $checkedin = vcs_file_info($htmlfile , quiet => 1 ) ? 1 : 0; #if ($checkedin) #{ print "==> `$htmlfile' : `$source' : $haswml : $checkedin\n"; } -- cgit v1.2.3