From 3215d3b21ab18ab9447f472b8e0b9815af07763c Mon Sep 17 00:00:00 2001 From: Justin Leitgeb Date: Sat, 31 May 2014 09:50:12 -0500 Subject: [PATCH] Remove unused field --- src/Main.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/src/Main.hs b/src/Main.hs index 95d6b95..9a87e4e 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -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"