From 6af6ddd4a4601ee300451e557ed3cbe117d53177 Mon Sep 17 00:00:00 2001
From: Will Scullin <scullin@scullin.com>
Date: Tue, 20 Apr 2021 19:40:26 -0700
Subject: [PATCH] Clean up bleed

---
 js/gl.ts | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/js/gl.ts b/js/gl.ts
index 5bd428f..d35301b 100644
--- a/js/gl.ts
+++ b/js/gl.ts
@@ -539,6 +539,12 @@ export class HiresPageGL implements HiresPage {
                 }
             }
         }
+        if (!this._refreshing && !doubleHiresMode && bank === 0) {
+            this._refreshing = true;
+            const after = addr + 1;
+            this._write(after >> 8, after & 0xff, this._buffer[0][after & 0x1fff], 0);
+            this._refreshing = false;
+        }
     }
 
     refresh() {