Installer: Do not use Inc() for compatibility with ANSI Inno Setup
authorSebastian Schuberth <sschuberth@gmail.com>
Sat, 12 Jan 2013 13:41:08 +0000 (12 14:41 +0100)
committerSebastian Schuberth <sschuberth@gmail.com>
Sat, 12 Jan 2013 13:41:08 +0000 (12 14:41 +0100)
See https://github.com/jrsoftware/issrc/issues/35#issuecomment-12177896.

Signed-off-by: Sebastian Schuberth <sschuberth@gmail.com>
share/WinGit/helpers.inc.iss

index a02a7ca..17cdd03 100644 (file)
@@ -11,7 +11,7 @@ begin
     i:=0;\r
     while (i<Len) and (Chars[i]<>#0) do begin\r
         Result[i+1]:=Chars[i];\r
-        Inc(i);\r
+        i:=i+1;\r
     end;\r
 \r
     SetLength(Result,i);\r
@@ -28,7 +28,7 @@ begin
     i:=0;\r
     while i<Len do begin\r
         Result[i]:=Str[i+1];\r
-        Inc(i);\r
+        i:=i+1;\r
     end;\r
 \r
     Result[i]:=#0;\r