diff --git a/src/JSONParsing.hs b/src/JSONParsing.hs
index cbc8bd4..c88855c 100644
--- a/src/JSONParsing.hs
+++ b/src/JSONParsing.hs
@@ -32,7 +32,7 @@ data Thread = Thread
   , locked        :: Maybe Int
   , cyclical      :: Maybe J.Cyclical
   , last_modified :: Int
-  , board         :: Text
+  -- , board         :: Text
   , files         :: Maybe [J.File]
   , resto         :: Int
   , unique_ips    :: Maybe Int
diff --git a/src/JSONPost.hs b/src/JSONPost.hs
index 510e9ea..f8cec67 100644
--- a/src/JSONPost.hs
+++ b/src/JSONPost.hs
@@ -23,7 +23,7 @@ data Post = Post
     , cyclical       :: Maybe J.Cyclical
     , last_modified  :: Int
     , embed          :: Maybe Text
-    , board          :: Text
+    -- , board          :: Text
     , files          :: Maybe [J.File]
     , resto          :: Int
     , unique_ips     :: Maybe Int
diff --git a/src/Lib.hs b/src/Lib.hs
index 5264ea8..f3e92e7 100644
--- a/src/Lib.hs
+++ b/src/Lib.hs
@@ -451,8 +451,8 @@ processFiles settings fgs tuples = do -- perfect just means that our posts have
                 , At.phash = phash
                 }
 
-        parseLegacyPaths :: JSONPosts.Post -> Maybe (At.Paths, At.Attachment)
-        parseLegacyPaths post = do
+        parseLegacyPaths :: Boards.Board -> JSONPosts.Post -> Maybe (At.Paths, At.Attachment)
+        parseLegacyPaths board post = do
             tim <- JSONPosts.tim post
             ext <- JSONPosts.ext post
             filename <- JSONPosts.filename post
@@ -460,9 +460,9 @@ processFiles settings fgs tuples = do -- perfect just means that our posts have
             spoiler <- JSONPosts.fsize post
 
             let
-                board = JSONPosts.board post
-                file_path = withPathPrefix $ board <> "/src/" <> tim <> ext
-                thumbnail_path = withPathPrefix $ board <> "/thumb/" <> tim <> ext
+                board_pathpart = T.pack $ Boards.pathpart board
+                file_path = (withPathPrefix "") </> (T.unpack $ board_pathpart <> "/src/" <> tim <> ext)
+                thumbnail_path = (withPathPrefix "") </> (T.unpack $ board_pathpart <> "/thumb/" <> tim <> ext)
 
                 p = At.Paths file_path thumbnail_path
 
@@ -510,7 +510,7 @@ processFiles settings fgs tuples = do -- perfect just means that our posts have
                         )
                     ) (zip [1..] files)
                 Nothing ->
-                    case parseLegacyPaths p of
+                    case parseLegacyPaths board p of
                         Nothing -> []
                         Just (paths, a) ->
                             let