diff --git a/fileStream.hs b/fileStream.hs
index 7f6a86c..91b370d 100644
--- a/fileStream.hs
+++ b/fileStream.hs
@@ -21,6 +21,7 @@ main :: IO ()
 main = do
     hSetEncoding stdout utf8
     runSafeT $ runEffect $
-        for (every (descendentOf "/mnt/Data/Japanese_Resources/")) $ \fp ->
+        -- do a favor to yourself and please point to where the dictionaries actually are.
+        for (every (descendentOf "/mnt/Data/Japanese_Resources/Dictionaries/")) $ \fp ->
             when (extension fp == Just "mdx") $
                 liftIO $ TIO.putStrLn $ T.pack $ encodeString fp