aboutsummaryrefslogtreecommitdiff
path: root/Command/Lock.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-01-01 13:22:38 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-01-01 13:22:38 -0400
commit802f4615d785a520744c912446dab06569526a91 (patch)
treea489061ac78c410b5e91d67de065dc6484ca1a4e /Command/Lock.hs
parenteb18baf6b84c59faee1b309bbe0721d0f11f4a70 (diff)
convert isPointerFile from Annex to IO
Diffstat (limited to 'Command/Lock.hs')
-rw-r--r--Command/Lock.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Lock.hs b/Command/Lock.hs
index 3fbe33d8a..e4039dd8b 100644
--- a/Command/Lock.hs
+++ b/Command/Lock.hs
@@ -41,7 +41,7 @@ startNew file key = ifM (isJust <$> isAnnexLink file)
( stop
, do
showStart "lock" file
- go =<< isPointerFile file
+ go =<< liftIO (isPointerFile file)
)
where
go (Just key')