Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal On branch : master
http://hackage.haskell.org/trac/ghc/changeset/579d7541582790bcb2ab8a8571835e63af07685e >--------------------------------------------------------------- commit 579d7541582790bcb2ab8a8571835e63af07685e Author: Duncan Coutts <[email protected]> Date: Tue Jan 13 14:26:04 2009 +0000 Print a newline after entering upload password So we end up with: Hackage password: Uploading test.tar.gz... rather than: Hackage password: Uploading test.tar.gz... >--------------------------------------------------------------- cabal-install/Distribution/Client/Upload.hs | 4 +++- 1 files changed, 3 insertions(+), 1 deletions(-) diff --git a/cabal-install/Distribution/Client/Upload.hs b/cabal-install/Distribution/Client/Upload.hs index 709f762..bb17457 100644 --- a/cabal-install/Distribution/Client/Upload.hs +++ b/cabal-install/Distribution/Client/Upload.hs @@ -73,9 +73,11 @@ upload verbosity repos mUsername mPassword paths = do putStr "Hackage password: " hFlush stdout -- save/restore the terminal echoing status - bracket (hGetEcho stdin) (hSetEcho stdin) $ \_ -> do + passwd <- bracket (hGetEcho stdin) (hSetEcho stdin) $ \_ -> do hSetEcho stdin False -- no echoing for entering the password fmap Password getLine + putStrLn "" + return passwd report :: Verbosity -> [Repo] -> IO () report verbosity repos _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
