diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2015-06-24 16:27:32 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2015-06-24 16:27:32 -0700 |
commit | e8019034268ece1f5aa1bd86fdf66b952cc9ec4e (patch) | |
tree | ce26f239506027ddfdb477c416094376a1498f11 | |
parent | 95fe5a4a07989382be6adb85f59ff7292a93fdee (diff) | |
download | mu-e8019034268ece1f5aa1bd86fdf66b952cc9ec4e.tar.gz |
1634
-rw-r--r-- | edit.mu | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/edit.mu b/edit.mu index c507f449..77e10983 100644 --- a/edit.mu +++ b/edit.mu @@ -284,7 +284,7 @@ recipe event-loop [ { t:address:touch-event <- maybe-convert e:event, touch:variant break-unless t:address:touch-event - editor:address:editor-data <- move-cursor-in-editor editor:address:editor-data, t:address:touch-event + editor:address:editor-data <- move-cursor-in-editor editor:address:editor-data, t:address:touch-event/deref loop +next-event:label } c:address:character <- maybe-convert e:event, text:variant @@ -296,11 +296,11 @@ recipe event-loop [ recipe move-cursor-in-editor [ default-space:address:array:location <- new location:type, 30:literal editor:address:editor-data <- next-ingredient - t:address:touch-event <- next-ingredient + t:touch-event <- next-ingredient row:address:number <- get-address editor:address:editor-data/deref, cursor-row:offset - row:address:number/deref <- get t:address:touch-event/deref, row:offset + row:address:number/deref <- get t:touch-event, row:offset column:address:number <- get-address editor:address:editor-data/deref, cursor-column:offset - column:address:number/deref <- get t:address:touch-event/deref, column:offset + column:address:number/deref <- get t:touch-event, column:offset # todo: adjust 'cursor' pointer into editor data ] |