split up Types

This commit is contained in:
Joey Hess 2010-10-11 17:19:55 -04:00
parent de3dafae80
commit af82586adf
11 changed files with 49 additions and 55 deletions

View file

@ -10,7 +10,12 @@ import System.IO
import Data.String.Utils
import Control.Exception
import Utility
import Types
-- a git repository
data GitRepo = GitRepo {
top :: FilePath,
bare :: Bool
}
{- GitRepo constructor -}
gitRepo :: FilePath -> IO GitRepo