ui.tools.listener: read-unsafe for interactor† †there's a failing test with this patch that needs investigation:
ui.tools.listener: read-unsafe for interactor†
†there's a failing test with this patch that needs investigation:

===
resource:basis/ui/tools/listener/listener-tests.factor: 90

Unit Test: { [ t ] [ "promise" get 2 seconds ?promise-timeout text = ] }

wait-timeout
===

erg/factor,erg/factor,mcandre/factor,erg/factor,erg/factor,mcandre/factor,mcandre/factor,mcandre/factor,mcandre/factor,erg/factor,mcandre/factor,erg/factor,erg/factor,mcandre/factor