comment out non-woring decompression
authorDobrica Pavlinusic <dpavlin@rot13.org>
Fri, 13 Aug 2010 22:00:08 +0000 (00:00 +0200)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Fri, 13 Aug 2010 22:00:08 +0000 (00:00 +0200)
evolis-printer.pl

index d37eddd..024c466 100755 (executable)
@@ -52,7 +52,10 @@ while(<>) {
 
                my ( $w, $h ) = ( 646, 1081 );  # from driver
 
+=for non-working
+
                my $data;
+
                my $i = 0;
                while ( $i < length $comp ) {
                        my $len = ord(substr($comp,$i,4));
@@ -63,6 +66,9 @@ while(<>) {
                        $i += $len;
                }
 
+=cut
+
+               my $data = $comp;
 
                my $path = "page-Dbc-$color-$page.pbm";
                $page++;