Don't stop iterating on a zero-length subentry.

crawl · Jan 4, 2013 · 1811108 · 1811108
1 parent e537b35
commit 1811108
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/learndb-html.pl b/learndb-html.pl
@@ -122,7 +122,7 @@ ($$$)
     print "<ol>" if $has_multiple;
     print htmlize($learndb{$key}, $has_multiple, ''), "\n";
     my $i=1;
-    while($learndb{$key."[".++$i."]"})
+    while(exists $learndb{$key."[".++$i."]"})
     {
       my $text = $learndb{$key."[$i]"};
       my $prefix = '';