drop the ansi command, make the ui command use ansi if vty is not available

Options.hs

@@ -31,9 +31,8 @@ usagehdr = printf (
   "  register - show register transactions\n" ++
 #ifdef VTY
   "  ui       - run a simple curses-based text ui\n" ++
-#endif
-#ifdef ANSI
-  "  ansi     - run a simple ansi-based text ui\n" ++
+#elif ANSI
+  "  ui       - run a simple ansi-based text ui\n" ++
 #endif
 #ifdef HAPPS
   "  web      - run a simple web ui\n" ++

Version.hs

@@ -39,8 +39,7 @@ versionmsg    = progname ++ " " ++ versionstr ++ configmsg ++ "\n"
 configflags   = tail [""
 #ifdef VTY
   ,"vty"
-#endif
-#ifdef ANSI
+#elif ANSI
   ,"ansi"
 #endif
 #ifdef HAPPS

hledger.hs

@@ -60,8 +60,7 @@ import PrintCommand
 import RegisterCommand
 #ifdef VTY
 import UICommand
-#endif
-#ifdef ANSI
+#elif ANSI
 import ANSICommand
 #endif
 #ifdef HAPPS
@@ -82,9 +81,8 @@ main = do
        | cmd `isPrefixOf` "register" = parseLedgerAndDo opts args register
 #ifdef VTY
        | cmd `isPrefixOf` "ui"       = parseLedgerAndDo opts args ui
-#endif
-#ifdef ANSI
-       | cmd `isPrefixOf` "ansi"     = parseLedgerAndDo opts args ansi
+#elif ANSI
+       | cmd `isPrefixOf` "ui"       = parseLedgerAndDo opts args ansi
 #endif
 #ifdef HAPPS
        | cmd `isPrefixOf` "web"      = parseLedgerAndDo opts args web