implement every command in single page cups output
authorDobrica Pavlinusic <dpavlin@rot13.org>
Sat, 14 Aug 2010 19:42:58 +0000 (21:42 +0200)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Sat, 14 Aug 2010 19:42:58 +0000 (21:42 +0200)
evolis-printer.pl

index ecbbde0..3347500 100755 (executable)
@@ -39,6 +39,10 @@ while(<>) {
        } elsif ( $c eq 'Pl' ) {
                $a[1] eq '=' or die;
                print "$_ brightnes? $a[0] = $a[2]\n";
+       } elsif ( $c eq 'Ps' ) {
+               $a[0] eq 'k' or die;
+               $a[1] eq '=' or die;
+               print "$_ qualityK $a[0] = $a[2]\n";
        } elsif ( $c eq 'Pr' ) {
                print "$_ improve (not in cups)\n";
        } elsif ( $c eq 'Ss' ) {