From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Tue, 30 Sep 2008 21:53:24 +0000 (+0200)
Subject: Docs: Make the name of the default CSS customizable
X-Git-Tag: release/2.11.61-1~11
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=b55934d56fe2b111ef3b487292c1bc15fe88e819;p=lilypond.git

Docs: Make the name of the default CSS customizable
---

diff --git a/lilypond-texi2html.init b/lilypond-texi2html.init
index d5539e69c4..a02ecf71dd 100644
--- a/lilypond-texi2html.init
+++ b/lilypond-texi2html.init
@@ -73,9 +73,11 @@ package Texi2HTML::Config;
 ###  SETTINGS FOR TEXI2HTML
 #############################################################################
 
-@Texi2HTML::Config::CSS_REFS      = ("lilypond.css");
-@Texi2HTML::Config::ALT_CSS_REFS      = ( 
-    {FILENAME => "lilypond-mccarty.css", TITLE=>"Patrick McCarty's design"}
+@Texi2HTML::Config::CSS_REFS      = (
+    {FILENAME => "lilypond.css", TITLE => "Default Style" }
+);
+@Texi2HTML::Config::ALT_CSS_REFS      = (
+    {FILENAME => "lilypond-mccarty.css", TITLE => "Patrick McCarty's design"}
 );
 $Texi2HTML::Config::USE_ACCESSKEY = 1;
 $Texi2HTML::Config::USE_LINKS     = 1;
@@ -248,7 +250,7 @@ sub lilypond_css_lines ($$)
     }
     foreach my $ref (@CSS_REFS)
     {
-        $Texi2HTML::THISDOC{'CSS_LINES'} .= "<link rel=\"stylesheet\" type=\"text/css\" href=\"$ref\" title=\"Default style\">\n";
+        $Texi2HTML::THISDOC{'CSS_LINES'} .= "<link rel=\"stylesheet\" type=\"text/css\" title=\"$ref->{TITLE}\" href=\"$ref->{FILENAME}\">\n";
     }
     foreach my $ref (@ALT_CSS_REFS)
     {