changeset 4:124384cddb7e

fix port number 8080 from 3000
author Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
date Sat, 13 Jul 2013 01:31:11 +0900
parents 1363ce4186a7
children 0d12b5e49dfd
files App.hs
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/App.hs	Tue Jul 02 18:33:29 2013 +0900
+++ b/App.hs	Sat Jul 13 01:31:11 2013 +0900
@@ -19,6 +19,6 @@
     lift $ function jungle query params
 
 main = do 
-    putStrLn $ "Listening on port " ++ show 3000
+    putStrLn $ "Listening on port " ++ show 8080
     jungle <- newJungle
-    run 3000 $ application jungle
+    run 8080 $ application jungle