projects
/
sysadmin-cookbook-html
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
display nice recepie names
[sysadmin-cookbook-html]
/
bin
/
html.pl
diff --git
a/bin/html.pl
b/bin/html.pl
index
cd9485d
..
0a591fa
100755
(executable)
--- a/
bin/html.pl
+++ b/
bin/html.pl
@@
-35,15
+35,18
@@
my $last_level = 0;
my $toc_html = '';
sub header {
my ($level, $content) = @_;
my $toc_html = '';
sub header {
my ($level, $content) = @_;
+ my $display = $content;
+ $display =~ s{^\d+[\.-]}{};
+ $display =~ s{-}{ }g;
html qq|<a name=$content></a>|;
html qq|<a name=$content></a>|;
- html qq|<h$level>$
content
</h$level>|;
+ html qq|<h$level>$
display
</h$level>|;
if ( $last_level > $level ) {
$toc_html .= "</ul>";
} elsif ( $last_level < $level ) {
$toc_html .= "<ul>";
}
if ( $last_level > $level ) {
$toc_html .= "</ul>";
} elsif ( $last_level < $level ) {
$toc_html .= "<ul>";
}
- $toc_html .= qq|<li><a href="#$content">$
content
</li>|;
+ $toc_html .= qq|<li><a href="#$content">$
display
</li>|;
$last_level = $level;
}
$last_level = $level;
}