Revision 400:4ad6499d7998 extra

View differences:

extra/soundsoftware/matlab-docs.pl
856 856
         # print "   $_: @{$_}\n";
857 857
         $numberofletter = $#{$_}+1;
858 858
         if ($numberofletter > 0) {
859
            print IFILE "\n<tr><td colspan=\"2\"><br /><strong><a name=\"\U$_\E$_\" class=\"an\">\U$_\E</a></strong></td></tr>\n";
859
            print IFILE "\n<tr><td colspan=\"2\"><br /><strong><a name=\"\U$_\E$_\"></a><span class=\"an\">\U$_\E</span></strong></td></tr>\n";
860 860
            $numberhalf = ($numberofletter + 1 - (($numberofletter+1) % 2))/2;
861 861
            if ($debug > 2) { print "   $_: @{$_} \t $numberhalf \t $numberofletter\n"; }
862 862
            for($count = 0; $count < $numberhalf; $count++) {
......
889 889
               if ($debug > 1) { print "   AZinforeach1: $name \t\t $hfilerelpath{$name} \t\t $dirnamerelpath{$LocalActDir}\n"; }
890 890
               if ($LocalGlobalLocal eq 'global') { $dirpath = $hfilerelpath{$name}; } else { $dirpath = ""; }
891 891
               if (! ($mfilename{$name} =~ /contents/i)) {
892
                  if ($firstone == 1) { print IFILE "\n<tr><td colspan=\"2\"><br /><strong><a name=\"\U$_\E$_\" class=\"an\">\U$_\E</a></strong></td></tr>\n"; $firstone = 0; } 
892
                  if ($firstone == 1) { print IFILE "\n<tr><td colspan=\"2\"><br /><strong><a name=\"\U$_\E$_\"></a><span class=\"an\">\U$_\E</span></strong></td></tr>\n"; $firstone = 0; } 
893 893
                  print IFILE "<tr><td valign=\"top\"><a href=\"$dirpath$mfilename{$name}$var{'exthtml'}\">$mfilename{$name}</a></td><td>$apropos{$name}</td></tr>\n";
894 894
               }
895 895
            }
......
1307 1307
            $_ = &SubstituteHTMLEntities($_);
1308 1308
            
1309 1309
            # check for comment in line and format with css em
1310
            s/(.*)%(.*)/$1<em class=\"mcom\">%$2<\/em>/;
1310
            s/^(.*)%(.*?)([\s\r\n]+)$/$1<em class=\"mcom\">%$2<\/em>$3/;
1311 1311

  
1312 1312
            # check/create cross references
1313 1313
            foreach $funname (@{'all'.$name}) {

Also available in: Unified diff