? 2008-03-17_Fix_Crashes_Lang.patch
Index: texi2html.init
===================================================================
RCS file: /sources/texi2html/texi2html/texi2html.init,v
retrieving revision 1.133
diff -u -p -3 -B -d -w -b -r1.133 texi2html.init
--- texi2html.init	17 Mar 2008 10:36:57 -0000	1.133
+++ texi2html.init	17 Mar 2008 11:31:05 -0000
@@ -2853,7 +2853,7 @@ sub t2h_default_click($$$$$)
     my $cmd = $Texi2HTML::THISDOC{'clickstyle'};
     $cmd = 'arrow' if (!defined($cmd) or ($cmd eq ''));
 
-    $hash = \%things_map;
+    my $hash = \%things_map;
     if ($context eq 'pre')
     {
         $hash = \%pre_map;
Index: texi2html.pl
===================================================================
RCS file: /sources/texi2html/texi2html/texi2html.pl,v
retrieving revision 1.199
diff -u -p -3 -B -d -w -b -r1.199 texi2html.pl
--- texi2html.pl	17 Mar 2008 10:36:57 -0000	1.199
+++ texi2html.pl	17 Mar 2008 11:31:06 -0000
@@ -586,7 +586,7 @@ sub T2H_GPL_style($$$$$$$$$)
         #print STDERR "GPL_STYLE $command ($style)\n";
         #print STDERR " @$args\n";
         $do_quotes = $style->{'quote'};
-        if ((@{$style->{'args'}} == 1) and defined($style->{'attribute'}))
+        if ((ref($style->{'args'}) eq 'ARRAY') and (@{$style->{'args'}} == 1) and defined($style->{'attribute'}))
         {
             $style = $style->{'attribute'};
             $use_attribute = 1;