1 files changed, 9 insertions(+), 4 deletions(-)

M src/manifest.tal

@@ 127,6 127,10 @@ JMP2r
 
 @menu-select ( cat -- )
 
+	( exists )
+	DUP ;get-cat JSR2 #0000 NEQ2 ,&exists JCN
+		POP JMP2r
+		&exists
 	( clear )
 	;draw-menu/sel LDA
 	( unchanged ) EQUk ,menu-deselect JCN


@@ 134,10 138,11 @@ JMP2r
 		DUP #00 ;draw-sub JSR2
 		&no-clear
 	POP
-	( draw application ) ;redraw-all JSR2
-	( unselect sub ) #ff ;draw-sub/sel STA
-	( select cat ) DUP ;draw-menu/sel STA
-	( draw sub ) #ff ;draw-sub JSR2
+	( draw )
+	;redraw-all JSR2
+	#ff ;draw-sub/sel STA
+	DUP ;draw-menu/sel STA
+	#ff ;draw-sub JSR2
 	;draw-menu JSR2
 
 JMP2r