Skip to content

Commit

Permalink
explicit imports
Browse files Browse the repository at this point in the history
  • Loading branch information
olivierverdier committed Dec 21, 2014
1 parent 1c96fe2 commit 97e2fd3
Show file tree
Hide file tree
Showing 2 changed files with 11 additions and 9 deletions.
8 changes: 5 additions & 3 deletions src/BranchParse.hs
Original file line number Diff line number Diff line change
@@ -1,8 +1,10 @@
module BranchParse (branchInfo, BranchInfo, noBranchInfo, Branch) where

import Control.Applicative hiding ((<|>), many, optional)
import Text.Parsec
import Text.Parsec.String
import Control.Applicative ((<$>), (<*>), (<*), (*>), (<$))
import Text.Parsec (digit, string, char, eof, anyChar,
many, many1, manyTill, noneOf, between,
parse, ParseError, (<|>), try)
import Text.Parsec.String (Parser)

{-
The idea is to parse the first line of the git status command.
Expand Down
12 changes: 6 additions & 6 deletions src/Main.hs
Original file line number Diff line number Diff line change
@@ -1,9 +1,9 @@
import System.Process
import System.Exit
import Control.Applicative
import Data.Maybe
import BranchParse
import StatusParse
import System.Process (readProcessWithExitCode)
import System.Exit (ExitCode(ExitSuccess))
import Control.Applicative ((<$>))
import Data.Maybe (fromMaybe)
import BranchParse (Branch, BranchInfo, branchInfo, noBranchInfo)
import StatusParse (StatusT(StatusC), processStatus)

{- Type aliases -}

Expand Down

0 comments on commit 97e2fd3

Please sign in to comment.