Remove unused field

This commit is contained in:
Justin Leitgeb 2014-05-31 09:50:12 -05:00
parent 35963e9358
commit 3215d3b21a

View File

@ -51,7 +51,6 @@ runRC errorHandler successHandler initialState remoteCommand =
------------------------------------------------------------------------------
setupDirs :: RC (Maybe String)
setupDirs = do
hostName <- use $ config . host
pathName <- use $ config . deployPath
remoteT $ "mkdir -p " ++ pathName ++ "/releases"