web: remove debug print

This commit is contained in:
Simon Michael 2010-02-03 21:20:32 +00:00
parent a8045c7c32
commit 86020e8f4a

View File

@ -124,7 +124,6 @@ server opts args l =
runWithConfig (ServerConf tcpport hostname) $ -- (Env -> IO Response) -> IO ()
\env -> do -- IO Response
-- general request handler
printf $ "request\n"
let a = intercalate "+" $ reqparam env "a"
p = intercalate "+" $ reqparam env "p"
opts' = opts ++ [Period p]