diff --git a/scriptlib/stdout_per_second.tcl b/scriptlib/stdout_per_second.tcl index e55947c0..2d4d3ccc 100644 --- a/scriptlib/stdout_per_second.tcl +++ b/scriptlib/stdout_per_second.tcl @@ -72,7 +72,10 @@ proc emit {} { set original_config [chan configure stdin] chan configure stdin -blocking 0 -buffering none -catch {chan configure stdin -inputmode raw} +if {[catch {chan configure stdin -inputmode raw} errM]} { + package require punk::console + punk::console::enableRaw +} variable ::cmdbuffer "" chan event stdin readable [list apply {{chan} { upvar ::cmdbuffer b