[freeside-commits] freeside/FS/FS/Misc eps2png.pm,1.1,1.2

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/Misc
In directory wavetail.420.am:/tmp/cvs-serv11953

Modified Files:
	eps2png.pm 
Log Message:
less debugging

Index: eps2png.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Misc/eps2png.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- eps2png.pm	17 Mar 2009 09:58:17 -0000	1.1
+++ eps2png.pm	17 Mar 2009 09:59:30 -0000	1.2
@@ -37,7 +37,7 @@
 #my $DEF_width = 90;			# desired widht
 #my $DEF_height = 36;		# desired height
 
-my ($verbose,$trace,$test,$debug) = (0,0,0,1);
+my ($verbose,$trace,$test,$debug) = (0,0,0,0);
 #handle_options ();
 set_out_type ('png'); # unless defined $format;
 warn "Producing $format ($gs_format) image.\n" if $verbose;
@@ -66,7 +66,7 @@
     my @eps = split(/\r?\n/, $eps);
 
     warn "converting eps (". length($eps). " bytes, ". scalar(@eps). " lines)\n"
-      ;#if $verbose;
+      if $verbose;
 
     my $line = shift @eps; #<EPS>;
     unless ( $eps =~ /^%!PS-Adobe.*EPSF-/ ) {