diff --git a/shell-conduit.cabal b/shell-conduit.cabal
--- a/shell-conduit.cabal
+++ b/shell-conduit.cabal
@@ -1,5 +1,5 @@
 name:                shell-conduit
-version:             4.5.1
+version:             4.5.2
 synopsis:            Write shell scripts with Conduit
 description:         Write shell scripts with Conduit. See "Data.Conduit.Shell" for documentation.
 license:             BSD3
diff --git a/src/Data/Conduit/Shell/Process.hs b/src/Data/Conduit/Shell/Process.hs
--- a/src/Data/Conduit/Shell/Process.hs
+++ b/src/Data/Conduit/Shell/Process.hs
@@ -44,7 +44,7 @@
 import           System.Exit
 import           System.IO
 import           System.Posix.IO (createPipe, fdToHandle)
-import           System.Process
+import           System.Process hiding (createPipe)
 import           System.Process.Internals (createProcess_)
 
 -- | A pipeable segment. Either a conduit or a process.
diff --git a/src/Data/Conduit/Shell/TH.hs b/src/Data/Conduit/Shell/TH.hs
--- a/src/Data/Conduit/Shell/TH.hs
+++ b/src/Data/Conduit/Shell/TH.hs
@@ -57,7 +57,7 @@
   do inScope <- recover (return False)
                         (do void (reify (mkName candidate))
                             return True)
-     if inScope
+     if inScope || candidate == "import"
         then getUniqueName (candidate ++ "'")
         else return (mkName candidate)