unnecessary show

This commit is contained in:
Simon Michael 2009-04-03 21:03:03 +00:00
parent 8e5640b432
commit db89918b56
2 changed files with 1 additions and 2 deletions

1
NOTES
View File

@ -18,7 +18,6 @@ We aim to make reliable, maintainable, usable software, sustainably.
* to do
** errors
*** hledger web & gives an error ?
** testing
*** run ledger 3 baseline tests
*** test all ledger file format features

View File

@ -40,7 +40,7 @@ web opts args l =
putStrLn $ printf "starting web server on port %d" tcpport
tid <- forkIO $ simpleHTTP nullConf{port=tcpport} handlers
putStrLn "starting web browser"
openBrowserOn $ printf "http://localhost:%s/balance" (show tcpport)
openBrowserOn $ printf "http://localhost:%d/balance" tcpport
waitForTermination
putStrLn "shutting down web server..."
killThread tid