From 5f5bfa8751b4a6a5a0b4b7a7cf31d7b297b0f1f1 Mon Sep 17 00:00:00 2001
From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Fri, 3 Jan 2003 08:03:53 +0000
Subject: [PATCH] DONE must set an error code

git-svn-id: svn://svn.cc65.org/cc65/trunk@1875 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 libsrc/c64/c64-320-200-2.s | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/libsrc/c64/c64-320-200-2.s b/libsrc/c64/c64-320-200-2.s
index ff19f1ba6..ee6ab2e20 100644
--- a/libsrc/c64/c64-320-200-2.s
+++ b/libsrc/c64/c64-320-200-2.s
@@ -193,7 +193,7 @@ INIT:
 
         lda     $D011        	; And turn on bitmap
         ora     #$20
-        sta     $D011
+DONE1:  sta     $D011
 
 ; Done, reset the error code
 
@@ -221,8 +221,7 @@ DONE:   lda     $DD02           ; Set the data direction regs
 
         lda     $D011
         and     #<~$20
-        sta     $D011
-        rts
+        jmp     DONE1
 
 ; ------------------------------------------------------------------------
 ; GETERROR: Return the error code in A and clear it.