From db89918b56ee8775d752deb3ae55454f359a78af Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Fri, 3 Apr 2009 21:03:03 +0000 Subject: [PATCH] unnecessary show --- NOTES | 1 - WebCommand.hs | 2 +- 2 files changed, 1 insertion(+), 2 deletions(-) diff --git a/NOTES b/NOTES index 3772d80e6..53bfdebcc 100644 --- a/NOTES +++ b/NOTES @@ -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 diff --git a/WebCommand.hs b/WebCommand.hs index fb5845889..f25da25ef 100644 --- a/WebCommand.hs +++ b/WebCommand.hs @@ -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