Modified behaviour of pointer during Wimp error boxes for NCs.

09edb35a · Steve Cormie · 7d6e0d6d · 09edb35a · 09edb35a
Commit 09edb35a authored Oct 07, 1998 by Steve Cormie
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 6 deletions

Version Version +3 -3

s/Wimp07 s/Wimp07 +2 -3

No files found.
--- a/Version
+++ b/Version
@@ -4,8 +4,8 @@
        GBLS    VString
        GBLS    Date

-Version SETA    396
-VString SETS    "3.96"
-Date    SETS    "10 Sep 1998"
+Version SETA    397
+VString SETS    "3.97"
+Date    SETS    "07 Oct 1998"

        END
--- a/s/Wimp07
+++ b/s/Wimp07
@@ -2462,11 +2462,10 @@ donegetr
 	ADRL	R14, ptrshlflag
 	LDR	R1, [R14]		; Get current pointer state.
 	TST	R1, #&07		; If pointer was off then
-	Push	R1
        MOVEQ   R0, #2                  ; turn on IconHigh, use single-tasking mode
        SWIEQ   XIconHigh_Start
-        Pull	R1
-        MOV	R0, #106		; Put pointer back to its stored state
+        MOV	R0, #106		; Enable pointer
+        MOV     R1, #1
        SWI	XOS_Byte
      |
        MOV     R0, #2                  ; turn on IconHigh, use single-tasking mode