@@ -691,9 +691,9 @@ reload orig inputs = do
691691
692692watch :: IState -> [FilePath] -> Idris (Maybe [FilePath])
693693watch orig inputs = do
694− let inputSet = S.fromList inputs
695− let dirs = nub $ map takeDirectory inputs
696694 resp <- runIO $ do
695+ let dirs = nub $ map takeDirectory inputs
696+ inputSet <- fmap S.fromList $ mapM canonicalizePath inputs
697697 signal <- newEmptyMVar
698698 withManager $ \mgr -> do
699699 forM_ dirs $ \dir ->