steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Revert "ui.tools.listener: removing unnecessary spawn." 

This reverts commit f8aa8038d3.
Breaks error handling: http://paste.factorcode.org/paste?id=2407
db4
Joe Groff 2011-11-15 12:35:25 -08:00
parent a248fc28a8
commit a1bb1fbd7a
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/ui/tools/listener/listener.factor
View File

@ -270,7 +270,9 @@ M: string listener-input
[ set-editor-string ] [ request-focus ] bi ; [ set-editor-string ] [ request-focus ] bi ;
: call-listener ( quot command -- ) : call-listener ( quot command -- )
get-ready-listener dup wait-for-listener (call-listener) ; get-ready-listener
'[ _ _ _ dup wait-for-listener (call-listener) ]
"Listener call" spawn drop ;
M: listener-command invoke-command ( target command -- ) M: listener-command invoke-command ( target command -- )
[ command-quot ] [ nip ] 2bi call-listener ; [ command-quot ] [ nip ] 2bi call-listener ;