From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Wed, 13 May 2009 20:23:53 +0000 (+0000)
Subject: display nice recepie names
X-Git-Url: http://git.rot13.org/?p=sysadmin-cookbook-html;a=commitdiff_plain;h=54c82eb6d404da8cdb0ada498b8b129a93573510;ds=sidebyside

display nice recepie names


git-svn-id: file:///home/dpavlin/private/svn/sysadmin-cookbook-html@3 3e18072f-9615-4e06-9d3a-648eafba3f8d
---

diff --git a/bin/html.pl b/bin/html.pl
index cd9485d..0a591fa 100755
--- 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 $display = $content;
+	$display =~ s{^\d+[\.-]}{};
+	$display =~ s{-}{ }g;
 	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>";
 	}
-	$toc_html .= qq|<li><a href="#$content">$content</li>|;
+	$toc_html .= qq|<li><a href="#$content">$display</li>|;
 	$last_level = $level;
 }