let's use words and unwords rather than split and intercalate " "

This commit is contained in:
Joey Hess 2013-03-30 18:55:22 -04:00
parent 5ed67562f6
commit 553e9dc736
3 changed files with 3 additions and 3 deletions

View file

@ -45,7 +45,7 @@ start key = ifM (inAnnex key)
where
go tmp = do
(opts,_,_) <- getOpt Permute rsyncSafeOptions <$>
maybe [] (split " ") <$> getField "RsyncOptions"
maybe [] words <$> getField "RsyncOptions"
ifM (liftIO $ rsyncServerReceive (map Param opts) tmp)
( ifM (isJust <$> Fields.getField Fields.direct)
( directcheck tmp