diff --git a/src/Main.hs b/src/Main.hs
index 7992285..b3d85f7 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -271,6 +271,7 @@ subFind = SubCommand "find" "Recursively search a directory tree" go
               <*> optional (option bstr (long "name" <> metavar "FILENAME"
                                                      <> help "the file name to match"))
     find mpath mexpr = SubHdfs $ do
+        _ <- getFileInfo "/"
         matcher <- liftIO (mkMatcher mexpr)
         printFindResults (fromMaybe "" mpath) matcher