diff --git a/handsy.cabal b/handsy.cabal
--- a/handsy.cabal
+++ b/handsy.cabal
@@ -1,5 +1,5 @@
 name:          handsy
-version:       0.0.6
+version:       0.0.7
 synopsis:      A DSL to describe common shell operations and interpeters for running them locally and remotely.
 -- description:   
 Homepage:      https://github.com/utdemir/handsy
@@ -24,6 +24,8 @@
                   , process
                   , transformers
                   , free
-                  , process-extras 
+                  , process-extras
+                  , shell-escape
   hs-source-dirs:   src
   default-language: Haskell2010
+  ghc-options: -Wall
diff --git a/src/System/Handsy.hs b/src/System/Handsy.hs
--- a/src/System/Handsy.hs
+++ b/src/System/Handsy.hs
@@ -3,12 +3,10 @@
 
 module System.Handsy where
 
-import           Control.Monad.IO.Class
 import qualified Data.ByteString.Lazy           as B
 import qualified Data.ByteString.Lazy.Char8     as C
 import           System.Exit
 
-import           Control.Monad.Free.TH
 import           Control.Monad.Trans.Free
 import           System.Process.ByteString.Lazy
 
diff --git a/src/System/Handsy/Remote.hs b/src/System/Handsy/Remote.hs
--- a/src/System/Handsy/Remote.hs
+++ b/src/System/Handsy/Remote.hs
@@ -4,14 +4,18 @@
 import           System.Handsy            as H
 import           System.Handsy.Internal   (HandsyF (..))
 
+import qualified Data.ByteString.Char8    as C8
 import qualified Data.ByteString.Lazy     as B
+import           System.Exit
 
 import           Control.Monad.IO.Class
 import           Control.Monad.Trans.Free
 
+import           Text.ShellEscape
+
 data RemoteOptions =
   RemoteOptions {
-    sshCommand :: (FilePath, [String])
+    sshCommand :: (String, [String])
   }
 
 -- | Executes the actions at a remote host
@@ -30,8 +34,10 @@
       -> runSsh prg args stdin >>= runRemote opts . next
 
   where
-    (ssh, sshOpts) = sshCommand opts
-    runSsh prg args stdin = run (command ssh (sshOpts ++ prg : args) stdin)
+    runSsh :: String -> [String] -> B.ByteString -> IO (ExitCode, B.ByteString, B.ByteString)
+    runSsh prg args stdin = let c = C8.unpack . C8.intercalate " " . map (bytes . bash . C8.pack) $ (prg:args)
+                                (ssh, sshOpts) = sshCommand opts
+                            in run $ command ssh (sshOpts ++ [c]) stdin
 
 -- | Copies a local file to remote host
 pushFile :: FilePath -- ^ Local path of source