summaryrefslogtreecommitdiff
path: root/Command/Uninit.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-06-12 11:32:06 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-06-12 11:32:06 -0400
commit942d8f72984377c4e69d7c55877621d434e5d687 (patch)
treeda1f205c66d57a4a88c727af382c4d6e09c2e881 /Command/Uninit.hs
parent85f0992c0378aad442da5dbbd5deadffe33f77e1 (diff)
hlint
Diffstat (limited to 'Command/Uninit.hs')
-rw-r--r--Command/Uninit.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/Uninit.hs b/Command/Uninit.hs
index 5724bffd0..46a2480e6 100644
--- a/Command/Uninit.hs
+++ b/Command/Uninit.hs
@@ -28,8 +28,8 @@ check = do
"cannot uninit when the " ++ show b ++ " branch is checked out"
top <- fromRepo Git.repoPath
cwd <- liftIO getCurrentDirectory
- whenM ((/=) <$> liftIO (absPath top) <*> liftIO (absPath cwd)) $ error $
- "can only run uninit from the top of the git repository"
+ whenM ((/=) <$> liftIO (absPath top) <*> liftIO (absPath cwd)) $
+ error "can only run uninit from the top of the git repository"
where
current_branch = Git.Ref . Prelude.head . lines <$> revhead
revhead = inRepo $ Git.Command.pipeRead