diff -r 209a0c573917 -r f3c79f7193a9 hedgewars/PascalExports.pas --- a/hedgewars/PascalExports.pas Mon Mar 01 19:20:43 2010 +0000 +++ b/hedgewars/PascalExports.pas Mon Mar 01 19:54:33 2010 +0000 @@ -52,7 +52,7 @@ procedure HW_versionInfo(netProto: PShortInt; versionStr: PString); cdecl; export; begin if netProto <> nil then netProto^:= cNetProtoVersion; - if versionStr <> nil then versionStr^:= string(cVersionString); + if versionStr <> nil then versionStr^:= shortstring(cVersionString); end; procedure HW_click; cdecl; export;