On Thu, Sep 04, 2008 at 12:38:08AM -0700, Patrick McCarty wrote:
> 
> Since an example with CSS_LINES is described, and this variable is
> used in the init file, I figured this might be relevant.
> 
> Regardless, it's clear that my problem was due to an upstream change.

Well, it seems this is a pretty easy fix.  It's a simple search and
replace.

Attached is a patch for the init file.  I've already tested it with
the latest texi2html CVS revision.  Of course, since this reflects an
internal texi2html change, everyone will need to do a CVS update.

Thanks,
Patrick
>From 282b676b7f06e24f1d44e1c100f2fd30ce93a425 Mon Sep 17 00:00:00 2001
From: Patrick McCarty <[EMAIL PROTECTED]>
Date: Thu, 4 Sep 2008 01:01:31 -0700
Subject: [PATCH] Fixed init file to reflect texi2html changes

* The CSS_LINES variable is no longer modified
  in texi2html.  Instead, its value is stored in
  Texi2HTML::THISDOC{'CSS_LINES'}.  This patch
  is a simple search and replace.

Signed-off-by: Patrick McCarty <[EMAIL PROTECTED]>
---
 lilypond-texi2html.init |   14 +++++++-------
 1 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/lilypond-texi2html.init b/lilypond-texi2html.init
index e208e59..df50fe2 100644
--- a/lilypond-texi2html.init
+++ b/lilypond-texi2html.init
@@ -233,19 +233,19 @@ sub lilypond_css_lines ($$)
 {
     my $import_lines = shift;
     my $rule_lines = shift;
-    return if (defined($CSS_LINES));
+    return if (defined($Texi2HTML::THISDOC{'CSS_LINES'}));
     if (@$rule_lines or @$import_lines)
     {
-        $CSS_LINES = "<style type=\"text/css\">\n<!--\n";
-        $CSS_LINES .= join('',@$import_lines) . "\n" if (@$import_lines);
-        $CSS_LINES .= join('',@$rule_lines) . "\n" if (@$rule_lines);
-        $CSS_LINES .= "-->\n</style>\n";
+        $Texi2HTML::THISDOC{'CSS_LINES'} = "<style type=\"text/css\">\n<!--\n";
+        $Texi2HTML::THISDOC{'CSS_LINES'} .= join('',@$import_lines) . "\n" if 
(@$import_lines);
+        $Texi2HTML::THISDOC{'CSS_LINES'} .= join('',@$rule_lines) . "\n" if 
(@$rule_lines);
+        $Texi2HTML::THISDOC{'CSS_LINES'} .= "-->\n</style>\n";
     }
     foreach my $ref (@CSS_REFS)
     {
-        $CSS_LINES .= "<link rel=\"stylesheet\" type=\"text/css\" 
href=\"$ref\">\n";
+        $Texi2HTML::THISDOC{'CSS_LINES'} .= "<link rel=\"stylesheet\" 
type=\"text/css\" href=\"$ref\">\n";
     }
-    $CSS_LINES .= "<!--[if lte IE 7]>\n<link href=\"lilypond-ie-fixes.css\" 
rel=\"stylesheet\" type=\"text/css\">\n<![endif]-->\n";
+    $Texi2HTML::THISDOC{'CSS_LINES'} .= "<!--[if lte IE 7]>\n<link 
href=\"lilypond-ie-fixes.css\" rel=\"stylesheet\" 
type=\"text/css\">\n<![endif]-->\n";
 }
 
 
-- 
1.6.0.1

_______________________________________________
lilypond-devel mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-devel

Reply via email to