소스 검색

amiga: removed some debugging settings

Marcus Sackrow 4 년 전
부모
커밋
c0d57d03c2
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  1. 2 2
      packages/rtl-console/src/amicommon/video.pp

+ 2 - 2
packages/rtl-console/src/amicommon/video.pp

@@ -318,7 +318,7 @@ begin
     // borders or titlebar as intended.
     ScreenWidth := VideoWindow^.GZZWidth div 8;
     ScreenHeight := VideoWindow^.GZZHeight div VideoFontHeight;
-    ScreenColor := True;
+    ScreenColor := False;
 
     {$ifdef VIDEODEBUG}
     Writeln('DEBUG: Fullscreen - windowed - Width * Heigth = ',ScreenWidth,' * ',ScreenHeight);
@@ -856,7 +856,7 @@ begin
     0: begin
          Mode.Col := 80;
          Mode.Row := 25;
-         Mode.Color := False;
+         Mode.Color := True;
        end;
     {$if not defined(AMIGA_V1_2_ONLY)}
     1: begin