--- a/hedgewars/uFLUtils.pas	Tue Nov 18 23:39:30 2014 +0300
+++ b/hedgewars/uFLUtils.pas	Wed Nov 19 00:38:14 2014 +0300
@@ -4,6 +4,7 @@
 function str2PChar(const s: shortstring): PChar;
 function intToStr(n: LongInt): shortstring;
 function midStr(s: shortstring; pos: byte): shortstring;
+procedure underScore2Space(var s: shortstring);
 
 implementation
 
@@ -31,4 +32,11 @@
     midStr:= copy(s, pos, length(s) - pos + 1)
 end;
 
+procedure underScore2Space(var s: shortstring);
+var i: LongInt;
+begin
+    for i:= length(s) downto 1 do
+        if s[i] = '_' then s[i]:= ' '
+end;
+
 end.