web: remove debug print
This commit is contained in:
		
							parent
							
								
									a8045c7c32
								
							
						
					
					
						commit
						86020e8f4a
					
				| @ -124,7 +124,6 @@ server opts args l = | |||||||
|     runWithConfig (ServerConf tcpport hostname) $            -- (Env -> IO Response) -> IO () |     runWithConfig (ServerConf tcpport hostname) $            -- (Env -> IO Response) -> IO () | ||||||
|       \env -> do -- IO Response |       \env -> do -- IO Response | ||||||
|        -- general request handler |        -- general request handler | ||||||
|        printf $ "request\n" |  | ||||||
|        let a = intercalate "+" $ reqparam env "a" |        let a = intercalate "+" $ reqparam env "a" | ||||||
|            p = intercalate "+" $ reqparam env "p" |            p = intercalate "+" $ reqparam env "p" | ||||||
|            opts' = opts ++ [Period p] |            opts' = opts ++ [Period p] | ||||||
|  | |||||||
		Loading…
	
		Reference in New Issue
	
	Block a user