[commit: packages/directory] improve-tests, improve-tests-for-real, master, tmp: Fix incorrect comment about removeDirectoryRecursive and symlinks (db88005)

git at git.haskell.org git at git.haskell.org
Thu Mar 19 11:36:21 UTC 2015


Repository : ssh://git@git.haskell.org/directory

On branches: improve-tests,improve-tests-for-real,master,tmp
Link       : http://ghc.haskell.org/trac/ghc/changeset/db88005a736f88ac212152d69ce4002f4d852219/directory

>---------------------------------------------------------------

commit db88005a736f88ac212152d69ce4002f4d852219
Author: Gracjan Polak <gracjan at scrive.com>
Date:   Fri Jun 6 17:03:34 2014 +0200

    Fix incorrect comment about removeDirectoryRecursive and symlinks


>---------------------------------------------------------------

db88005a736f88ac212152d69ce4002f4d852219
 System/Directory.hs | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/System/Directory.hs b/System/Directory.hs
index 739892c..a7f85ad 100644
--- a/System/Directory.hs
+++ b/System/Directory.hs
@@ -460,9 +460,10 @@ removeDirectory path =
 
 #endif
 
--- | @'removeDirectoryRecursive' dir@  removes an existing directory /dir/
--- together with its content and all subdirectories. Be careful,
--- if the directory contains symlinks, the function will follow them.
+-- | @'removeDirectoryRecursive' dir@ removes an existing directory
+-- /dir/ together with its content and all subdirectories. If the
+-- directory contains symlinks this function removes but does not
+-- follow them.
 removeDirectoryRecursive :: FilePath -> IO ()
 removeDirectoryRecursive startLoc = do
   cont <- getDirectoryContents startLoc



More information about the ghc-commits mailing list