module Main where

import App.Commands         (commands)
import HaskellWorks.Prelude

import qualified Options.Applicative as OA

main :: IO ()
main = join $ OA.customExecParser
  (OA.prefs $ OA.showHelpOnEmpty <> OA.showHelpOnError)
  (OA.info (commands <**> OA.helper) OA.idm)