From c06fd200bdfd05ed1a99791651f5a69722661ef0 Mon Sep 17 00:00:00 2001
From: Paul Gilbert
Date: Sun, 11 Aug 2019 20:53:48 -0700
Subject: GLK: FROTZ: Properly erase window when Arthur intro finishes

---
 engines/glk/frotz/windows.cpp | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'engines/glk/frotz')

diff --git a/engines/glk/frotz/windows.cpp b/engines/glk/frotz/windows.cpp
index 9f7dd83fec..9f7e6917b4 100644
--- a/engines/glk/frotz/windows.cpp
+++ b/engines/glk/frotz/windows.cpp
@@ -217,6 +217,12 @@ void Window::setCursor() {
 void Window::clear() {
 	if (_win)
 		g_vm->glk_window_clear(_win);
+
+	if (_windows->_background) {
+		Rect r(_properties[X_SIZE] * g_conf->_monoInfo._cellW, _properties[Y_SIZE] * g_conf->_monoInfo._cellH);
+		r.moveTo((_properties[X_POS] - 1) * g_conf->_monoInfo._cellW, (_properties[Y_POS] - 1) * g_conf->_monoInfo._cellH);
+		_windows->_background->fillRect(g_conf->_windowColor, r);
+	}
 }
 
 void Window::updateColors() {
-- 
cgit v1.2.3