mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

remove unnecessary use of MissingH

Browse source
This commit is contained in:
Joey Hess 2015-01-21 13:36:48 -04:00
parent 38874c4fe0
commit 32fac4b71b
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
Remote/Ddar.hs
View file

@ -12,7 +12,6 @@ import qualified Data.Map as M
import qualified Data.ByteString.Lazy as L import qualified Data.ByteString.Lazy as L
import System.IO.Error import System.IO.Error
import Data.String.Utils
import Common.Annex import Common.Annex
import Types.Remote import Types.Remote
import Types.Key import Types.Key
@ -164,7 +163,7 @@ ddarDirectoryExists ddarrepo
ExitSuccess -> return $ Right True ExitSuccess -> return $ Right True
ExitFailure 1 -> return $ Right False ExitFailure 1 -> return $ Right False
ExitFailure code -> return $ Left $ "ssh call " ++ ExitFailure code -> return $ Left $ "ssh call " ++
show (Data.String.Utils.join " " $ toCommand params) ++ show (unwords $ toCommand params) ++
" failed with status " ++ show code " failed with status " ++ show code
where where
(host, ddarrepo') = splitRemoteDdarRepo ddarrepo (host, ddarrepo') = splitRemoteDdarRepo ddarrepo