summaryrefslogtreecommitdiff
path: root/Annex/Link.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-09-25 03:09:06 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-09-25 03:09:06 -0400
commitd9c5d32c34885cac67c44c633c5351461902d166 (patch)
tree2628093b15b5564a33364cf67d54d87ef0f2474e /Annex/Link.hs
parent2270913743982ab33c68d17c8ed68326e1711f95 (diff)
hlint
test suite still passes
Diffstat (limited to 'Annex/Link.hs')
-rw-r--r--Annex/Link.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Annex/Link.hs b/Annex/Link.hs
index becd7e7ec..30d8c2ae8 100644
--- a/Annex/Link.hs
+++ b/Annex/Link.hs
@@ -68,9 +68,9 @@ getAnnexLinkTarget file = ifM (coreSymlinks <$> Annex.getGitConfig)
-- characters, or whitespace, we
-- certianly don't have a link to a
-- git-annex key.
- if any (`elem` s) "\0\n\r \t"
- then return ""
- else return s
+ return $ if any (`elem` s) "\0\n\r \t"
+ then ""
+ else s
{- Creates a link on disk.
-