slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

web: don't bother running cli unit tests at startup

Browse Source
This commit is contained in:
Simon Michael 2011-09-12 23:38:21 +00:00
parent f2ce07145f
commit 85cb11efbf
1 changed files with 0 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
hledger-web/hledger-web.hs
View File

@ -25,7 +25,6 @@ import Yesod.Logger (makeLogger)
import Hledger import Hledger
import Hledger.Cli hiding (progname,progversion) import Hledger.Cli hiding (progname,progversion)
import Hledger.Cli.Tests
import Prelude hiding (putStrLn) import Prelude hiding (putStrLn)
import Hledger.Utils.UTF8 (putStrLn) import Hledger.Utils.UTF8 (putStrLn)
import Hledger.Web import Hledger.Web
@ -54,8 +53,6 @@ withJournalDo' opts cmd = do
-- | The web command. -- | The web command.
web :: WebOpts -> Journal -> IO () web :: WebOpts -> Journal -> IO ()
web opts j = do web opts j = do
putStrLn $ "Running self-tests..."
runTestsOrExit $ cliopts_ opts
-- unless (debug_ $ cliopts_ opts) $ forkIO (browser baseurl) >> return () -- unless (debug_ $ cliopts_ opts) $ forkIO (browser baseurl) >> return ()
server (base_url_ opts) (port_ opts) opts j server (base_url_ opts) (port_ opts) opts j