From 0cead8c5d56f10804e9ef3d9eca5a314ecca1f7d Mon Sep 17 00:00:00 2001
From: hashirama <hashirama@noreply.localhost>
Date: Thu, 29 May 2025 03:20:05 +0000
Subject: [PATCH] Update fileStream.hs

---
 fileStream.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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