--- trunk/MWS.pm	2004/05/08 20:34:26	27
+++ trunk/MWS.pm	2004/05/09 00:09:32	30
@@ -31,7 +31,7 @@
 
 my $folder;	# placeholder for folders
 
-my $debug = 2;
+my $debug = 1;
 
 sub new {
 	my $class = shift;
@@ -116,7 +116,7 @@
 		push @out, sprintf($f, $v);
 	}
 
-print STDERR "fmtdate: ",join('|',@out),"\n";
+	print STDERR "fmtdate: ",join('|',@out),"\n" if ($debug == 2);
 
 	return (wantarray ? @out : join("-",@out));
 }