diff -r 7705784902e1 -r 844bd43db47a hedgewars/uFLUtils.pas --- 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.