It's "min", not "max". Duh.

tadzik · Aug 11, 2011 · 7e38bdb · 7e38bdb
1 parent 7c4ca05
commit 7e38bdb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Pod/To/HTML.pm b/lib/Pod/To/HTML.pm
@@ -63,7 +63,7 @@ sub buildindexes {
 }
 
 sub heading2html($pod) {
-    my $lvl = max($pod.level, 6);
+    my $lvl = min($pod.level, 6);
     my $txt = escape($pod.content[0].content.Str, 'html');
     @indexes.push: Pair.new(key => $lvl, value => $txt);
     return "<h$lvl><a class='u' href='#___top' title='click to go to top of document' name='$txt'>{$txt}</a></h$lvl>\n";