From 54d9c06af157d8e0b288dc3c45220adfb89ec53a Mon Sep 17 00:00:00 2001
From: Polish Language Team <polish>
Date: Thu, 23 Nov 2000 03:19:44 +0000
Subject: cut down on verbosity

CVS version numbers

touch_translations.pl: 1.2 -> 1.3
---
 touch_translations.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'touch_translations.pl')

diff --git a/touch_translations.pl b/touch_translations.pl
index 71750b07944..d023ffd07b6 100755
--- a/touch_translations.pl
+++ b/touch_translations.pl
@@ -49,12 +49,12 @@
 @langs = values(%langs);
 
 # Set this to 1 for debugging
-$debug = 1;
+$debug = 0;
 
 sub rebuild {
     my $file = shift;
     $now = time;
-    print "touching $file\n";
+    print "touching $file\n" if $debug;
     utime $now, $now, $file or die "$file: $!";
 }
 
@@ -115,7 +115,7 @@ foreach $lang (@langs) {
     my $transfile = $argfile;
     my ($maxdelta, $mindelta) = (5, 2);
     my ($original, $langrev);
-    print "Now checking $lang\n";
+    print "Now checking $lang\n" if $debug;
     $transfile =~ s+$arglang+$lang+ or die "wrong argument: pattern does not match file: $transfile";
 
     # Parse the translated file
-- 
cgit v1.2.3