diff --git a/3rdparty/hpath b/3rdparty/hpath
index 148eeb6..c570505 160000
--- a/3rdparty/hpath
+++ b/3rdparty/hpath
@@ -1 +1 @@
-Subproject commit 148eeb619fd6d44589dae556970c623eb4a42131
+Subproject commit c570505297f22fda08248dae66072c9bff9ce607
diff --git a/src/HSFM/FileSystem/FileType.hs b/src/HSFM/FileSystem/FileType.hs
index 63eb129..30abd8f 100644
--- a/src/HSFM/FileSystem/FileType.hs
+++ b/src/HSFM/FileSystem/FileType.hs
@@ -704,13 +704,6 @@ isBrokenSymlink _ = False
 ---- OTHER: ----
 
 
--- |Check whether the given file is a hidden file.
-hiddenFile :: Path Fn -> Bool
-hiddenFile (Path ".")  = False
-hiddenFile (Path "..") = False
-hiddenFile p           = "." `B.isPrefixOf` (P.fromRel p)
-
-
 -- |Apply a function on the free variable. If there is no free variable
 -- for the given constructor the value from the `Default` class is used.
 fromFreeVar :: (Default d) => (a -> d) -> File a -> d
diff --git a/src/HSFM/GUI/Gtk/MyView.hs b/src/HSFM/GUI/Gtk/MyView.hs
index 82c2586..5408e96 100644
--- a/src/HSFM/GUI/Gtk/MyView.hs
+++ b/src/HSFM/GUI/Gtk/MyView.hs
@@ -303,7 +303,7 @@ constructView mygui myview = do
      item    <- (name . file) <$> treeModelGetRow rawModel' iter
      if hidden
        then return True
-       else return $ not . hiddenFile $ item
+       else return $ not . P.hiddenFile $ item
 
   -- sorting
   sortedModel' <- treeModelSortNewWithModel filteredModel'