add cut in vertical tables in case a register doesn't exist in any board

diff --git a/xml-db/get.pl b/xml-db/get.pl
index 3a13ce6c1eff8afcc3b46f9c0b14247ddb989269..8e3b9d88573c630ccad1d78a60a5bc6109fa33fc 100755 (executable)
--- a/xml-db/get.pl
+++ b/xml-db/get.pl
@@ -563,10 +563,12 @@ sub generateoutput {
       for(my $i=0;$i<($obj->{repeat}//1);$i++) {
         $t .= "<tr><td>";
         $t .= "<td class=\"slice\">$i" if $obj->{repeat};
+        my $v;
         for my $boards (sort keys %{$tarrhead}) {
-          $t .= $tarrcont->{$boards}[$i] // '<td class="nonex">';
+          $v = $tarrcont->{$boards}[$i];
+          $t .= $v // '<td class="nonex">';
           }
- 
+        last unless $v;
         }
       }
     $t .= "</table>";