fix compile warning

This commit is contained in:
Joey Hess 2015-02-12 16:03:59 -04:00
parent 5be7ba7ee5
commit 3f5c9ddc05

View file

@ -143,7 +143,7 @@ performRemote key file backend numcopies remote =
( go True (Just tmpfile)
, do
warning "failed to download file from remote"
go True Nothing
void $ go True Nothing
return False
)
dispatch (Right False) = go False Nothing