diff options
Diffstat (limited to 'edit')
| -rw-r--r-- | edit/002-typing.mu | 2 | ||||
| -rw-r--r-- | edit/004-programming-environment.mu | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/edit/002-typing.mu b/edit/002-typing.mu index 12448e18..906422f5 100644 --- a/edit/002-typing.mu +++ b/edit/002-typing.mu @@ -20,7 +20,7 @@ def editor-event-loop screen:&:screen, console:&:console, editor:&:editor -> scr cursor-row:num <- get *editor, cursor-row:offset cursor-column:num <- get *editor, cursor-column:offset screen <- move-cursor screen, cursor-row, cursor-column - e:event, console, found?:bool, quit?:bool <- read-event console + e:event, found?:bool, quit?:bool, console <- read-event console loop-unless found? break-if quit? # only in tests trace 10, [app], [next-event] diff --git a/edit/004-programming-environment.mu b/edit/004-programming-environment.mu index d7107b35..13969cf3 100644 --- a/edit/004-programming-environment.mu +++ b/edit/004-programming-environment.mu @@ -61,7 +61,7 @@ def event-loop screen:&:screen, console:&:console, env:&:environment -> screen:& { # looping over each (keyboard or touch) event as it occurs +next-event - e:event, console, found?:bool, quit?:bool <- read-event console + e:event, found?:bool, quit?:bool, console <- read-event console loop-unless found? break-if quit? # only in tests trace 10, [app], [next-event] |