commitid.scad.pl: Simply gentextmodule_demo_start_batch

[reprap-play.git] / commitid.scad.pl

diff --git a/commitid.scad.pl b/commitid.scad.pl
index 9b344e264aba88966800a0694f818bd4a1e36cf4..6d7459e5f88eaf88ae7c2982f729b6b08bf0ee62 100755 (executable)
--- a/commitid.scad.pl
+++ b/commitid.scad.pl
@@ -141,9 +141,9 @@ our $gtm_demo_i = -1;
 our $gtm_demo_j;
 our @gtm_demo_o;
 
-sub gentextmodule_demo_start_batch ($;$) {
-    ($gtm_demo_i, $gtm_demo_j) = @_;
-    $gtm_demo_j //= 0;
+sub gentextmodule_demo_start_batch () {
+    $gtm_demo_j = 0;
+    $gtm_demo_i++;
 }
 
 sub gentextmodule ($@) {
@@ -356,7 +356,7 @@ sub do_git () {
     }
 
     foreach my $sz (3..10) {
-       gentextmodule_demo_start_batch($sz-3);
+       gentextmodule_demo_start_batch();
 
        gentextmodule_plusq("Small$sz", rjustt($sz, $git_count, $git_dirty))
            if defined $git_count;
@@ -402,7 +402,7 @@ while (@ARGV) {
 
 $do_git //= defined($argcounter) ? '' : 'co';
 
-gentextmodule_demo_start_batch(-1);
+gentextmodule_demo_start_batch();
 gentextmodule('FontDemo', @demo);
 
 do_git();