瀏覽代碼

* Removed debug-code accidentally introduced in r19952 that fails to compile on some targets

git-svn-id: trunk@19958 -
joost 13 年之前
父節點
當前提交
f995da2746
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      packages/fpmkunit/src/fpmkunit.pp

+ 2 - 2
packages/fpmkunit/src/fpmkunit.pp

@@ -3400,7 +3400,7 @@ procedure TCustomInstaller.Log(Level: TVerboseLevel; Const Msg: String);
 begin
   If Level in FLogLevels then
     begin
-    Writeln(StdOut,hexStr(GetThreadID,8),': ', Msg);
+    Writeln(StdOut, Msg);
     Flush(StdOut);
     end;
 end;
@@ -3817,7 +3817,7 @@ end;
 
 procedure TBuildEngine.Error(const Fmt: String; const Args: array of const);
 begin
-  Raise EInstallerError.CreateFmt(hexStr(GetThreadID,8)+ ': '+Fmt,Args);
+  Raise EInstallerError.CreateFmt(Fmt,Args);
 end;