This commit was generated by cvs2svn to compensate for changes in r11022,
[freeside.git] / FS / FS / Misc / eps2png.pm
index 49c1d56..aa8e572 100644 (file)
@@ -31,13 +31,13 @@ my $mono = 0;                       # produce BW images if non-zero
 my $format;                    # output format
 my $gs_format;                 # GS output type
 my $output;                    # output, defaults to STDOUT
-my $antialias = 8; #4;              # antialiasing
+my $antialias = 4;              # antialiasing
 my $DEF_width;                 # desired widht
 my $DEF_height;                # desired height
 #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 @@ sub eps2png {
     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-/ ) {