@@ -504,7 +504,7 @@ programName     DIM             76
 . display a box for the user to enter the name of the program
 .
                 KEYIN           *SETSWALL=(cy-1):(cy+1):2:(charScrWidth-1),*BORDER,*P=2:2:
-                                *UC,*RPTCHAR="_":(charScrWidth-4),*P=2:2,programName
+                                *IT,*RPTCHAR="_":(charScrWidth-4),*P=2:2,programName
 .
 . CHAIN back to answer if "X"
 .
@@ -514,6 +514,7 @@ programName     DIM             76
 . correctly so set the trap
 .
                 EXCEPTSET       CProgNotFound if CFAIL
+                DISPLAY		*RESETSW;   //Fix chain-to program displays!
                 CHAIN           ProgramName
 
 CProgNotFound
Original file line number	Diff line number	Diff line change
`@@ -504,7 +504,7 @@ programName DIM 76`
`504`	`504`	`. display a box for the user to enter the name of the program`
`505`	`505`	`.`
`506`	`506`	`KEYIN SETSWALL=(cy-1):(cy+1):2:(charScrWidth-1),BORDER,*P=2:2:`
`507`		`- UC,RPTCHAR="_":(charScrWidth-4),*P=2:2,programName`
	`507`	`+ IT,RPTCHAR="_":(charScrWidth-4),*P=2:2,programName`
`508`	`508`	`.`
`509`	`509`	`. CHAIN back to answer if "X"`
`510`	`510`	`.`
`@@ -514,6 +514,7 @@ programName DIM 76`
`514`	`514`	`. correctly so set the trap`
`515`	`515`	`.`
`516`	`516`	`EXCEPTSET CProgNotFound if CFAIL`
	`517`	`+ DISPLAY *RESETSW; //Fix chain-to program displays!`
`517`	`518`	`CHAIN ProgramName`
`518`	`519`
`519`	`520`	`CProgNotFound`