diff -r 606acf1f80be -r 0a4c88935902 hedgewars/uLocale.pas --- a/hedgewars/uLocale.pas Thu May 10 22:15:31 2012 +0200 +++ b/hedgewars/uLocale.pas Thu May 10 23:21:56 2012 +0200 @@ -29,6 +29,10 @@ function Format(fmt: ansistring; var arg: ansistring): ansistring; function GetEventString(e: TEventId): ansistring; +{$IFDEF HWLIBRARY} +procedure LoadLocaleWrapper(str: pchar); cdecl; export; +{$ENDIF} + implementation uses uRandom, uUtils, uVariables, uDebug, uConsole; @@ -129,9 +133,11 @@ Format:= copy(fmt, 1, i - 1) + arg + Format(copy(fmt, i + 2, Length(fmt) - i - 1), arg) end; +{$IFDEF HWLIBRARY} procedure LoadLocaleWrapper(str: pchar); cdecl; export; begin LoadLocale(Strpas(str)); end; +{$ENDIF} end.