squelch a couple of warnings about moveAnnex return code
This commit is contained in:
parent
3690e9b071
commit
75029536e5
2 changed files with 2 additions and 2 deletions
|
@ -225,5 +225,5 @@ randKey sz = withTmpFile "randkey" $ \f h -> do
|
|||
}
|
||||
k <- fromMaybe (error "failed to generate random key")
|
||||
<$> Backend.getKey Backend.Hash.testKeyBackend ks
|
||||
moveAnnex k f
|
||||
_ <- moveAnnex k f
|
||||
return k
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue