about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-06-24 17:45:26 -0700
committerKartik K. Agaram <vc@akkartik.com>2015-06-24 17:49:42 -0700
commit4704b7d8be57f536e6a1979dd275377acfbaa233 (patch)
tree42b76df5e37990fa5cb21d3edd007dfc26da216a
parent6179649e43d08e08460382df6a333cdd58ca0a9a (diff)
downloadmu-4704b7d8be57f536e6a1979dd275377acfbaa233.tar.gz
1642
Wait, it works now?
-rw-r--r--edit.mu6
1 files changed, 3 insertions, 3 deletions
diff --git a/edit.mu b/edit.mu
index b04b9645..5518ac4d 100644
--- a/edit.mu
+++ b/edit.mu
@@ -277,14 +277,14 @@ recipe event-loop [
     break-if quit?:boolean  # only in tests
     trace [app], [next-event]
     {
-      t:address:touch-event <- maybe-convert e:event, 2:variant
+      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/deref
       loop +next-event:label
     }
-    $print e:event
+#?     $print e:event #? 1
     c:address:character <- maybe-convert e:event, text:variant
-    close-console
+#?     close-console #? 1
     assert c:address:character, [event was of unknown type; neither keyboard nor mouse]
     loop
   }