commit 235c781

remove quit

 1@@ -83,17 +83,9 @@
 2       (system* "xdg-open" (item-name (current-item my-menu)))
 3       (loop (getch stdscr)
 4 	    )
 5-      ((eqv? c #\q)
 6-       (endwin)
 7-       )
 8-
 9-      ((not (or
10-                (eqv? c #\q)))
11-
12-       (loop (getch stdscr))
13-           (fs (list-directory (getcwd))
14-       )))
15 
16     ;;(free-menu my-menu)
17-    (refresh stdscr)
18-	)))
19+	       (refresh stdscr)
20+	              (loop (getch stdscr))
21+           (fs (list-directory (getcwd))
22+	)))))