Martijn Laan преди 4 месеца
родител
ревизия
77b8b311fe
променени са 2 файла, в които са добавени 2 реда и са изтрити 0 реда
  1. 1 0
      Projects/Src/Compiler.SetupCompiler.pas
  2. 1 0
      Projects/Src/Setup.Install.pas

+ 1 - 0
Projects/Src/Compiler.SetupCompiler.pas

@@ -7002,6 +7002,7 @@ var
         try
         try
           var ExpectedFileHash: TSHA256Digest;
           var ExpectedFileHash: TSHA256Digest;
           if floISSigVerify in FLExtraInfo.Flags then begin
           if floISSigVerify in FLExtraInfo.Flags then begin
+            { See Setup.Install's CopySourceFileToDestFile for similar code }
             if Length(ISSigKeys) = 0 then { shouldn't fail: flag stripped already }
             if Length(ISSigKeys) = 0 then { shouldn't fail: flag stripped already }
               AbortCompileFmt(SCompilerCompressInternalError, ['Length(ISSigKeys) = 0']);
               AbortCompileFmt(SCompilerCompressInternalError, ['Length(ISSigKeys) = 0']);
             const SigFilename = FileLocationEntryFilenames[I] + '.issig';
             const SigFilename = FileLocationEntryFilenames[I] + '.issig';

+ 1 - 0
Projects/Src/Setup.Install.pas

@@ -277,6 +277,7 @@ var
 begin
 begin
   var ExpectedFileHash: TSHA256Digest;
   var ExpectedFileHash: TSHA256Digest;
   if ISSigVerify then begin
   if ISSigVerify then begin
+    { See Compiler.SetupCompiler's TSetupCompiler.Compile for similar code }
     if not NewFileExists(ISSigFilename) then
     if not NewFileExists(ISSigFilename) then
       ISSigVerifyError(ISSigMissingFile);
       ISSigVerifyError(ISSigMissingFile);
     const SigText = ISSigLoadTextFromFile(ISSigFilename);
     const SigText = ISSigLoadTextFromFile(ISSigFilename);