hedgewars/uScript.pas
branch0.9.24
changeset 13398 ae5d6448c5be
parent 13345 85644a45e988
child 13399 7b4726ef2308
child 13687 f60b3998ba56
--- a/hedgewars/uScript.pas	Fri Apr 27 11:19:23 2018 -0400
+++ b/hedgewars/uScript.pas	Thu May 17 20:04:07 2018 -0400
@@ -3406,7 +3406,7 @@
 if f = nil then
     exit;
 
-hedgewarsMountPackage(Str2PChar(copy(s, 1, length(s)-4)+'.hwp'));
+hedgewarsMountPackage(Str2PChar(copy(s, 3, length(s)-6)+'.hwp'));
 
 physfsReaderSetBuffer(@buf);
 if Pos('Locale/',s) <> 0 then