Fix Rober Spalek & Hans-Joerg Frieden in the CPP resp. plain text versions of the credits

svn-id: r48034

1 files changed, 7 insertions, 4 deletions

diff --git a/tools/credits.pl b/tools/credits.pl
index d3902d359e..0fdc1fd1de 100755
--- a/tools/credits.pl
+++ b/tools/credits.pl
@@ -79,8 +79,8 @@ sub html_entities_to_ascii {
 
 	$text =~ s/ä/a/g;
 	$text =~ s/ü/ue/g;
-	# HACK: Torbj*o*rn but G*oe*ffringmann and R*oe*ver
-	$text =~ s/ör/or/g;
+	# HACK: Torbj*o*rn but G*oe*ffringmann and R*oe*ver and J*oe*rg
+	$text =~ s/Torbjörn/Torbjorn/g;
 	$text =~ s/ö/oe/g;
 
 	$text =~ s/&/&/g;
@@ -92,12 +92,13 @@ sub html_entities_to_ascii {
 sub html_entities_to_cpp {
 	my $text = shift;
 
+	# The numerical values are octal!
 	$text =~ s/á/\\341/g;
 	$text =~ s/é/\\351/g;
 	$text =~ s/ó/\\363/g;
 	$text =~ s/ø/\\370/g;
 	$text =~ s/ł/l/g;
-	$text =~ s/Š/\\352/g;
+	$text =~ s/Š/S/g;
 
 	$text =~ s/ä/\\344/g;
 	$text =~ s/ö/\\366/g;
@@ -116,9 +117,11 @@ sub html_entities_to_rtf {
 	$text =~ s/é/\\'8e/g;
 	$text =~ s/ó/\\'97/g;
 	$text =~ s/ø/\\'bf/g;
+	# The following numerical values are octal!
 	$text =~ s/ł/\\uc0\\u322 /g;
-	$text =~ s/Š/\\uc0\\u352 /g;
+	$text =~ s/Š/\\uc0\\u540 /g;
 
+	# Back to hex numbers
 	$text =~ s/ä/\\'8a/g;
 	$text =~ s/ö/\\'9a/g;
 	$text =~ s/ü/\\'9f/g;