From 7390bc0e5e19f9dfc92e1198a0add5e0f73604c7 Mon Sep 17 00:00:00 2001
From: "Ryan C. Gordon" <[EMAIL REDACTED]>
Date: Wed, 14 Jul 2021 09:36:07 -0400
Subject: [PATCH] wikiheaders.pl: Fix \sa tags that (incorrectly!) have "()"
appended.
---
build-scripts/wikiheaders.pl | 2 ++
1 file changed, 2 insertions(+)
diff --git a/build-scripts/wikiheaders.pl b/build-scripts/wikiheaders.pl
index c4019cb67..80a15d3d6 100755
--- a/build-scripts/wikiheaders.pl
+++ b/build-scripts/wikiheaders.pl
@@ -611,6 +611,7 @@ sub usage {
my @desclines = split /\n/, $v;
foreach (@desclines) {
s/\A(\:|\* )//;
+ s/\(\)\Z//; # Convert "SDL_Func()" to "SDL_Func"
$str .= "\\sa $_\n";
}
}
@@ -764,6 +765,7 @@ sub usage {
$sections{'Version'} = wordwrap($desc) . "\n";
} elsif ($l =~ /\A\\sa\s+(.*)\Z/) {
my $sa = $1;
+ $sa =~ s/\(\)\Z//; # Convert "SDL_Func()" to "SDL_Func"
$sections{'Related Functions'} = '' if not defined $sections{'Related Functions'};
if ($wikitype eq 'mediawiki') {
$sections{'Related Functions'} .= ":[[$sa]]\n";