X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FMisc%2Feps2png.pm;h=aa8e5729a83ff6f2ca4fa977287f0689fa0a7253;hb=40a7b3dc653e099f7bd0bd762b649b04c4432db2;hp=49c1d56823f7a443ef9a9404bf7841b526f0cbf2;hpb=2755d4a4810600f4392eaf73f362b4f358adeec6;p=freeside.git diff --git a/FS/FS/Misc/eps2png.pm b/FS/FS/Misc/eps2png.pm index 49c1d5682..aa8e5729a 100644 --- a/FS/FS/Misc/eps2png.pm +++ b/FS/FS/Misc/eps2png.pm @@ -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; #; unless ( $eps =~ /^%!PS-Adobe.*EPSF-/ ) {