diff options
| author | Joey Hess <joeyh@joeyh.name> | 2016-08-12 12:10:41 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-08-12 12:10:41 -0400 |
| commit | ecc967a33fbd4724f5782f6d6b858b3df103b134 (patch) | |
| tree | d7fc098e08f558170db2c6979dfd2f300e9b559d /UI.hs | |
| parent | 3ee306d3d4bda52268f07df874070b65d171694e (diff) | |
| download | keysafe-ecc967a33fbd4724f5782f6d6b858b3df103b134.tar.gz | |
prompt for name
Diffstat (limited to 'UI.hs')
| -rw-r--r-- | UI.hs | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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 |