Commit 45b4dc62 authored by Duncan Coutts's avatar Duncan Coutts
Browse files

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...
parent d4230dd8
......@@ -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
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment