diff options
Diffstat (limited to 'Command/RecvKey.hs')
-rw-r--r-- | Command/RecvKey.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/RecvKey.hs b/Command/RecvKey.hs index 3a8747534..988c4f90e 100644 --- a/Command/RecvKey.hs +++ b/Command/RecvKey.hs @@ -40,7 +40,7 @@ start key = fieldTransfer Download key $ \_p -> do , return False ) where - go tmp = do + go tmp = unVerified $ do opts <- filterRsyncSafeOptions . maybe [] words <$> getField "RsyncOptions" liftIO $ rsyncServerReceive (map Param opts) tmp |