chiark / gitweb /
commitid.scad.pl: Provide more Full*T
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Fri, 5 Feb 2016 19:13:45 +0000 (19:13 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Fri, 5 Feb 2016 19:13:45 +0000 (19:13 +0000)
commitid.scad.pl

index de57166..9b344e2 100755 (executable)
@@ -105,10 +105,7 @@ $SIG{__WARN__} = sub { die @_; };
 #            Full6    abcdef       Full8     abcdef01
 #                     23456*                 _123456*
 #
 #            Full6    abcdef       Full8     abcdef01
 #                     23456*                 _123456*
 #
-#   Full6T
-#   Full9T
-#   Full12T
-#   Full15T
+#   Full6T Full9T Full12T ... Full30T
 #       as Full but commit is split over two lines
 #       for a 3-line message; eg
 #             Full9T    abc
 #       as Full but commit is split over two lines
 #       for a 3-line message; eg
 #             Full9T    abc
@@ -372,13 +369,11 @@ sub do_git () {
                          ljustt($sz, $git_object),
                          rjustt($sz, $git_count, $git_dirty));
 
                          ljustt($sz, $git_object),
                          rjustt($sz, $git_count, $git_dirty));
 
-           if (!($sz % 2)) {
-               my $e = $sz/2;
-               gentextmodule("Full".($e*3)."T",
-                             ljustt($e*2, $git_object, $git_dirty)
-                             =~ m/.{$e}/g,
-                             rjustt($e, $git_count));
-           }
+           my $e = $sz;
+           gentextmodule("Full".($e*3)."T",
+                         ljustt($e*2, $git_object, $git_dirty)
+                         =~ m/.{$e}/g,
+                         rjustt($e, $git_count));
        }
     }
 }    
        }
     }
 }