Merged revisions 1732 via svnmerge from

http://[email protected]/svn/fpc/trunk

........
r1732 | hajny | 2005-11-13 17:30:18 +0000 (Sun, 13 Nov 2005) | 1 line

  * DosWrite only possible under non-PM apps
........

git-svn-id: branches/fixes_2_0@1734 -

rtl/os2/system.pas

@@ -774,7 +774,8 @@ begin
        begin
         Str (RC, ErrStr);
         ErrStr := 'Error during heap initialization (DosAllocMem - ' + ErrStr + ')!!'#13#10;
-        DosWrite (2, @ErrStr [1], Length (ErrStr), RC);
+        if IsConsole then
+         DosWrite (2, @ErrStr [1], Length (ErrStr), RC);
         HandleError (204);
        end
       else