Fixed problem where find wouldn't do name node switchover properly

jacobstanley · Jul 24, 2015 · 7ef45cf · 7ef45cf
1 parent 6581fe0
commit 7ef45cf
Showing 1 changed file with 1 addition and 0 deletions.
diff --git 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