pre-render next card
authorDobrica Pavlinusic <dpavlin@rot13.org>
Fri, 3 Sep 2010 07:58:39 +0000 (09:58 +0200)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Fri, 3 Sep 2010 07:58:39 +0000 (09:58 +0200)
scripts/print.pl

index 8168856..2336bba 100755 (executable)
@@ -119,6 +119,7 @@ do {
                                print $log iso_date, ",$tag,$number\n";
                                $programmed->{$tag} = $number;
 
+                               render_card; # pre-render next one
                        }
 
                },
@@ -141,6 +142,17 @@ sub _counters {
        return $counters;
 }
 
+sub render_card {
+       return unless @queue;
+       my @data = @{$queue[0]};
+       my $nr = $data[0];
+
+       if ( ! ( -e "out/$nr.front.pbm" && -e "out/$nr.front.pbm" ) ) {
+               print "RENDER @data\n";
+               system "$evolis_dir/scripts/inkscape-render.pl", "$evolis_dir/card/ffzg-2010.svg", @data;
+       }
+}
+
 sub print_card {
 
        if ( ! @queue ) {
@@ -166,7 +178,7 @@ sub print_card {
 
        } else {
 
-               system "$evolis_dir/scripts/inkscape-render.pl", "$evolis_dir/card/ffzg-2010.svg", @data;
+               render_card;
                system "$evolis_dir/scripts/evolis-driver.pl out/$nr.front.pbm out/$nr.back.pbm > /dev/usb/lp0";
 
        }