Clear input area when grafting listener
parent
230e9476a7
commit
495f2d82be
|
@ -160,6 +160,7 @@ M: stack-display tool-scroller
|
||||||
{
|
{
|
||||||
[ com-end ]
|
[ com-end ]
|
||||||
[ clear-output ]
|
[ clear-output ]
|
||||||
|
[ input>> clear-input ]
|
||||||
[ start-listener-thread ]
|
[ start-listener-thread ]
|
||||||
[ wait-for-listener ]
|
[ wait-for-listener ]
|
||||||
} cleave ;
|
} cleave ;
|
||||||
|
|
Loading…
Reference in New Issue