aboutsummaryrefslogtreecommitdiff
path: root/Types/UrlContents.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2014-12-11 20:13:37 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2014-12-11 20:13:37 -0400
commit7504b0ccbb22ee9e33ee6b6a9c2e2b32bde571ab (patch)
tree353960affb635920f3454163a5ade414dab8399a /Types/UrlContents.hs
parent743dcc87eee871833b3c676fcd0fcb16f6ad3349 (diff)
don't allow file paths to .git directory
Diffstat (limited to 'Types/UrlContents.hs')
-rw-r--r--Types/UrlContents.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/Types/UrlContents.hs b/Types/UrlContents.hs
index d6dee120b..2085aebfa 100644
--- a/Types/UrlContents.hs
+++ b/Types/UrlContents.hs
@@ -39,6 +39,7 @@ mkSafeFilePath p = SafeFilePath $ if null p' then "file" else p'
safe s
| isDrive s = False
| s == ".." = False
+ | s == ".git" = False
| null s = False
| otherwise = True