diff options
Diffstat (limited to 'Git')
| -rw-r--r-- | Git/Branch.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Git/Branch.hs b/Git/Branch.hs index fd04f1f46..523c641d7 100644 --- a/Git/Branch.hs +++ b/Git/Branch.hs @@ -37,7 +37,7 @@ current r = do {- The current branch, which may not really exist yet. -} currentUnsafe :: Repo -> IO (Maybe Git.Ref) currentUnsafe r = parse . firstLine - <$> pipeReadStrict [Param "symbolic-ref", Param $ fromRef Git.Ref.headRef] r + <$> pipeReadStrict [Param "symbolic-ref", Param "-q", Param $ fromRef Git.Ref.headRef] r where parse l | null l = Nothing |