convert isPointerFile from Annex to IO
This commit is contained in:
parent
00f0411d12
commit
a2c056df65
4 changed files with 5 additions and 5 deletions
|
@ -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')
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue