This commit is contained in:
Jay McCarthy 2018-01-02 11:41:50 -05:00
parent 10e9522149
commit 8676b3736b
2 changed files with 3 additions and 2 deletions

View File

@ -78,6 +78,9 @@
[x (error 'cursor-position "Something weird happened, got ~e" x)])))) [x (error 'cursor-position "Something weird happened, got ~e" x)]))))
;; xxx xterm-set-window-title ;; xxx xterm-set-window-title
#;(begin
(display (A:set-mode A:alternate-screen-mode))
(display (A:reset-mode A:alternate-screen-mode)))
;; xxx Do I make a 'lux chaos' for this? ;; xxx Do I make a 'lux chaos' for this?
;; ;;

View File

@ -2,7 +2,6 @@
(require racket/format (require racket/format
raart) raart)
#;
(module+ test (module+ test
(draw (crop 1 80 1 20 (draw (crop 1 80 1 20
;;70 80 10 20 ;;70 80 10 20
@ -17,7 +16,6 @@
(style 'bold (text "Right"))))))))) (style 'bold (text "Right")))))))))
(newline)) (newline))
#;
(module+ test (module+ test
(draw (translate (draw (translate
2 10 2 10