Permalink
Browse files

Improve the message printed by sandbox-delete.

  • Loading branch information...
1 parent d41e646 commit 086f0752c3154ee961b4cb896421caea07b4d418 @23Skidoo 23Skidoo committed Oct 15, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 cabal-install/Distribution/Client/Sandbox.hs
@@ -143,8 +143,8 @@ sandboxDelete verbosity sandboxFlags _globalFlags = do
removeFile (pkgEnvDir </> sandboxPackageEnvironmentFile)
if sandboxLoc == defaultSandboxLocation
then do
- sandboxDir <- getSandboxLocation verbosity sandboxFlags
- notice verbosity $ "deleting..."
+ sandboxDir <- canonicalizePath sandboxLoc
+ notice verbosity $ "Deleting the sandbox located at " ++ sandboxDir
removeDirectoryRecursive sandboxDir
else
die $ "Non-default sandbox location used: " ++ sandboxLoc

0 comments on commit 086f075

Please sign in to comment.