quacks-ingredients: -counts: Fix a ws mistake nfc

[reprap-play.git] / quacks-ingredients-counts

diff --git a/quacks-ingredients-counts b/quacks-ingredients-counts
index 4913f3cf90504f693381f2f4b1d5a0e0a2bdd4d6..46d7f1bee8c294027a22e71bca1eeaa1627866b3 100755 (executable)
--- a/quacks-ingredients-counts
+++ b/quacks-ingredients-counts
@@ -39,7 +39,7 @@ foreach my $nspots (qw(1 2 3 4)) {
        m/\+/;
        
        $count{$names[$i]}{$nspots} =
-           $which eq 'All'    ? $` + $' :
+           $which eq 'All'     ? $` + $' :
            $which eq 'Base'    ? $`      :
            $which eq 'Witches' ?      $' :
            die "$which ?";
@@ -67,7 +67,7 @@ sub wrtoplevel () {
     $max_nrows = $nrows if $nrows > $max_nrows;
     $max_rowsz = $rowsz if $rowsz > $max_rowsz;
     my $ix = 0;
-    printf "// %-5s %-10s  total=%2d  rowsz=$rowsz  nrows=$nrows\n",
+    printf "// %s  %-10s  total=%2d  rowsz=$rowsz  nrows=$nrows\n",
        $which, "$name", $total;
     foreach my $nspots (sort keys %$cs) {
        my $c = $cs->{$nspots};