From 0299524420701b1225c273c7ceff1f8093a3028b Mon Sep 17 00:00:00 2001 From: tv Date: Thu, 25 Dec 2014 18:40:39 +0100 Subject: is nop --- test3.hs | 3 +++ 1 file changed, 3 insertions(+) diff --git a/test3.hs b/test3.hs index bcaec33..d122ce5 100644 --- a/test3.hs +++ b/test3.hs @@ -121,6 +121,9 @@ main' query = --v = Z.root cursor update vty pic nextEvent vty >>= \e -> case e of + EvKey KEsc [] -> + rec q + EvKey (KChar 'c') [MCtrl] -> error "^C" -- cgit v1.2.3