diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2015-09-12 13:49:50 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2015-09-12 13:51:25 -0700 |
commit | fa94f4d92340f001560b16dd0c2e5681ca5db031 (patch) | |
tree | 8de1aa88979d8d8606cf0a7f737d33fbb633f7b7 /edit/006-sandbox-edit.mu | |
parent | 7169c636272a71a9f18d6c90e458c8089346c1fe (diff) | |
download | mu-fa94f4d92340f001560b16dd0c2e5681ca5db031.tar.gz |
2183 - environment + external editor using tmux
Thanks Jack and Caleb Couch for the idea.
Diffstat (limited to 'edit/006-sandbox-edit.mu')
-rw-r--r-- | edit/006-sandbox-edit.mu | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/edit/006-sandbox-edit.mu b/edit/006-sandbox-edit.mu index e43e09b2..90be2de7 100644 --- a/edit/006-sandbox-edit.mu +++ b/edit/006-sandbox-edit.mu @@ -63,8 +63,7 @@ recipe foo [ ] after <global-touch> [ - # right side of screen and below sandbox editor? pop appropriate sandbox - # contents back into sandbox editor provided it's empty + # below sandbox editor? pop appropriate sandbox contents back into sandbox editor { sandbox-left-margin:number <- get *current-sandbox, left:offset click-column:number <- get *t, column:offset @@ -77,7 +76,7 @@ after <global-touch> [ below-sandbox-editor?:boolean <- greater-or-equal click-row, first-sandbox-begins break-unless below-sandbox-editor? empty-sandbox-editor?:boolean <- empty-editor? current-sandbox - break-unless empty-sandbox-editor? # make the user hit F4 before editing a new sandbox + break-unless empty-sandbox-editor? # don't clobber existing contents # identify the sandbox to edit and remove it from the sandbox list sandbox:address:sandbox-data <- extract-sandbox env, click-row text:address:array:character <- get *sandbox, data:offset @@ -139,9 +138,7 @@ scenario sandbox-with-print-can-be-edited [ assume-console [ press F4 ] - run [ - event-loop screen:address, console:address, 3:address:programming-environment-data - ] + event-loop screen:address, console:address, 3:address:programming-environment-data screen-should-contain [ . run (F4) . . ┊ . |