diff --git a/conduitFileStream.hs b/conduitFileStream.hs
index a7d9e2e..43b9c2e 100644
--- a/conduitFileStream.hs
+++ b/conduitFileStream.hs
@@ -7,16 +7,18 @@
 module Main where
 
 import qualified Data.Conduit.Combinators as CC
+import Data.Conduit
 import Data.Text (pack,unpack)
 import System.Environment (getArgs)
 import System.IO (stdout)
 import System.FilePath (takeExtension)
+import Conduit
 
 -- | Recursively list all files in the given directory, streaming each file path as UTF-8 bytes to stdout.
 listFiles :: FilePath -> IO ()
 listFiles dir = runConduitRes $
        -- 1) Walk the directory (produces `FilePath`)
-       sourceDirectoryDeep False dir
+       CC.sourceDirectoryDeep False dir
   .|   -- 2) Filter *before* converting to Text
        filterC (\fp -> takeExtension fp == ".mdx")
   .|   -- 3) Convert to Text, append newline, then encode