diff --git a/lib/Polysemy/Process/Interpreter/ProcessIOE.hs b/lib/Polysemy/Process/Interpreter/ProcessIOE.hs
--- a/lib/Polysemy/Process/Interpreter/ProcessIOE.hs
+++ b/lib/Polysemy/Process/Interpreter/ProcessIOE.hs
@@ -1,4 +1,6 @@
 {-# options_haddock prune #-}
+{-# language CPP #-}
+
 -- |Description: Process Interpreters for stdpipes, Internal
 module Polysemy.Process.Interpreter.ProcessIOE where
 
@@ -33,6 +35,10 @@
 import Polysemy.Process.Effect.Process (Process)
 import Polysemy.Process.Interpreter.Process (interpretProcessNative)
 
+#if !MIN_VERSION_relude(1,0,0)
+import System.IO (BufferMode (NoBuffering), hSetBuffering)
+#endif
+
 newtype In a =
   In { unIn :: a }
   deriving (Eq, Show)
@@ -63,10 +69,10 @@
   Handle ->
   Sem r ()
 readQueue discardWhenFull handle = do
-  embed @IO (hSetBuffering handle NoBuffering)
+  void $ tryAny (hSetBuffering handle NoBuffering)
   tryAny (hGetSome handle 4096) >>= traverse_ \ msg -> do
-      if discardWhenFull then void (Queue.tryWrite (In msg)) else Queue.write (In msg)
-      readQueue discardWhenFull handle
+    if discardWhenFull then void (Queue.tryWrite (In msg)) else Queue.write (In msg)
+    readQueue discardWhenFull handle
 
 writeQueue ::
   ∀ r .
@@ -74,7 +80,7 @@
   Handle ->
   Sem r ()
 writeQueue handle = do
-  embed @IO (hSetBuffering handle NoBuffering)
+  void $ tryAny (hSetBuffering handle NoBuffering)
   spin
   where
     spin =
diff --git a/polysemy-process.cabal b/polysemy-process.cabal
--- a/polysemy-process.cabal
+++ b/polysemy-process.cabal
@@ -5,7 +5,7 @@
 -- see: https://github.com/sol/hpack
 
 name:           polysemy-process
-version:        0.5.1.0
+version:        0.5.1.1
 synopsis:       Polysemy Effects for System Processes
 description:    See <https://hackage.haskell.org/package/polysemy-process/docs/Polysemy-Process.html>
 category:       Concurrency
@@ -109,7 +109,6 @@
     , relude >=0.7
     , stm
     , stm-chans >=2
-    , string-interpolate >=0.2
     , template-haskell
     , text
     , time
