From ecc967a33fbd4724f5782f6d6b858b3df103b134 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Fri, 12 Aug 2016 12:10:41 -0400
Subject: prompt for name

---
 UI.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'UI.hs')

diff --git a/UI.hs b/UI.hs
index a97f3c1..279f6b9 100644
--- a/UI.hs
+++ b/UI.hs
@@ -3,7 +3,7 @@
  - Licensed under the GNU AGPL version 3 or higher.
  -}
 
-module UI where
+module UI (module UI, module Types.UI) where
 
 import Types.UI
 import Control.Monad
@@ -11,7 +11,7 @@ import UI.Zenity
 import UI.Readline
 
 availableUIs :: IO [UI]
-availableUIs = filterM isAvailable [zenityUI, readlineUI]
+availableUIs = filterM isAvailable [readlineUI, zenityUI]
 
 selectUI :: Bool -> IO UI
 selectUI needgui
-- 
cgit v1.2.3