EOF
@a = split (/\n/, $files_content[$f]);
$strikeextra = "";
+ $api_shown = 0;
for ($ai = 0; $ai < $#a; $ai++){
$line = $a[$ai];
open HACKOUT, ">$dir/deploy/$name" || die "Could not open output";
$line = 0;
+ $doprint = 0;
while (<HACK>){
+ print HACKOUT $last if ($doprint);
$line++;
s/^\/\/<!\[CDATA\[//;
s/^\/\/\]\]>\/\///;
# Remove the junk <span> wrapper generated by AgilityPack
if ($line==1){
- s/<?span>//;
+ s/<span>//;
}
if (/<style type/){
# Replace the CSS in the XHTML output with the original CSS
last if (/<\/style>/);
}
}
-
- print HACKOUT $_;
+ $last = $_;
+ $doprint = 1;
+ }
+ if (!($last =~ /span/)){
+ print HACKOUT $last;
}
+
#system ("cp.exe $dir/html/$name $dir/deploy/$name");
}
}
$body = "";
$functions[$fn++] = $func;
$deprecated = 0;
-
# Process arguments
while (<>){
s/NULL/<code>NULL<\/code>/g;
$returns =~ s/#(\w+)/<code>\1<\/code>/g;
$args =~ s/#(\w+)/<code>\1<\/code>/g;
- $returns =~ s/\`([:\w\*]+)\`/<code>\1<\/code>/g;
- $args =~ s/\`([:\w\*]+)\`/<code>\1<\/code>/g;
- $body =~ s/\`([:\w\*]+)\`/<code>\1<\/code>/g;
+ $returns =~ s/\`([:.\w\*]+)\`/<code>\1<\/code>/g;
+ $args =~ s/\`([:.\w\*]+)\`/<code>\1<\/code>/g;
+ $body =~ s/\`([:.\w\*]+)\`/<code>\1<\/code>/g;
$body =~ s/\n/ /;
$bodies{$func} = $body;
}
chop;
s/^\ \*//;
- $_ = "\n<p>" if (/^\s+$/);
+ $_ = "<p>" if (/^\s*$/);
if ($inbody == 0){
if (/\s*(\w+):(.*)/){
} else {
$body = "\t$_\n";
+
$inbody = 1;
}
} elsif ($inbody == 1) {