Adam wrote:
> Is FIVE on the way? (Factor's Ingenious Visual Editor)
Heh... Nah, this is just stuff I need for git-tool. When I kick off an
external process (various git commands) I often need to display the
output of the command. Eventually the presented output should be
tailored to the git commands, but for now, I need a generic tool.
Something like the word below is what I'm using. So you can do this for
example:
{ "ls" "/etc" "/blah" } run-process/result popup-process-window*
and you'll get a window showing you the stdout and stderr.
:: popup-process-window* ( PROCESS -- )
[let | STDOUT-EDITOR [ <editor> ]
STDERR-EDITOR [ <editor> ] |
{ 0 1 } <track>
PROCESS stdout>>
[
"stdout" <label> reverse-video-theme f track-add
STDOUT-EDITOR <scroller> 1/2 track-add
]
when
PROCESS stderr>>
[
"stderr" <label> reverse-video-theme f track-add
STDERR-EDITOR <scroller> 1/2 track-add
]
when
"process output" open-window
PROCESS stdout>> "\n" join STDOUT-EDITOR set-editor-string
PROCESS stderr>> "\n" join STDERR-EDITOR set-editor-string ] ;
------------------------------------------------------------------------------
This SF.net email is sponsored by:
SourcForge Community
SourceForge wants to tell your story.
http://p.sf.net/sfu/sf-spreadtheword
_______________________________________________
Factor-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/factor-talk
