s/Option.CommandLine/CommandLineOption/

fujimura · Sep 8, 2014 · e808ec7 · e808ec7
1 parent e17ff7e
commit e808ec7
Show file tree

Hide file tree

Showing 4 changed files with 11 additions and 9 deletions.
diff --git a/hi.cabal b/hi.cabal
@@ -56,7 +56,7 @@ library
       Hi.FilePath
       Hi.Git
       Hi.Option
-      Hi.Option.Commandline
+      Hi.CommandLineOption
       Hi.Template
       Hi.Types
       Hi.Version

diff --git a/src/Cli.hs b/src/Cli.hs
@@ -4,6 +4,8 @@ module Cli
   ) where
 
 import qualified Hi
+import           Hi.CommandLineOption         (CommandLineOption,
+                                               commandLineOption)
 import           Hi.Option                    (buildOption, defaultRepo)
 import qualified Hi.Version                   as Version
 

diff --git a/src/Hi/Option/Commandline.hs → src/Hi/CommandLineOption.hs b/src/Hi/Option/Commandline.hs → src/Hi/CommandLineOption.hs
@@ -1,4 +1,4 @@
-module Hi.Option.Commandline
+module Hi.CommandLineOption
   ( CommandLineOption(..)
   , commandLineOption
   ) where

diff --git a/src/Hi/Option.hs b/src/Hi/Option.hs
@@ -7,16 +7,16 @@ module Hi.Option
     , buildOption
     ) where
 
-import qualified Hi.Git                as Git
-import           Hi.Option.Commandline (CommandLineOption)
-import qualified Hi.Option.Commandline as CommandLineOption
+import           Hi.CommandLineOption (CommandLineOption)
+import qualified Hi.CommandLineOption as CommandLineOption
+import qualified Hi.Git               as Git
 import           Hi.Types
 
 import           Control.Applicative
-import           Data.Char             (isUpper, toLower)
-import           Data.Maybe            (fromMaybe)
-import           Data.Time.Calendar    (toGregorian)
-import           Data.Time.Clock       (getCurrentTime, utctDay)
+import           Data.Char            (isUpper, toLower)
+import           Data.Maybe           (fromMaybe)
+import           Data.Time.Calendar   (toGregorian)
+import           Data.Time.Clock      (getCurrentTime, utctDay)
 
 buildOption :: CommandLineOption -> IO Option
 buildOption copt = do