diff --git a/size.rkt b/size.rkt index d052fbc..c7d1afd 100644 --- a/size.rkt +++ b/size.rkt @@ -78,6 +78,9 @@ [x (error 'cursor-position "Something weird happened, got ~e" x)])))) ;; 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? ;; diff --git a/t/draw.rkt b/t/draw.rkt index 0820bb5..c84cead 100644 --- a/t/draw.rkt +++ b/t/draw.rkt @@ -2,7 +2,6 @@ (require racket/format raart) -#; (module+ test (draw (crop 1 80 1 20 ;;70 80 10 20 @@ -17,7 +16,6 @@ (style 'bold (text "Right"))))))))) (newline)) -#; (module+ test (draw (translate 2 10