Skip to content
Browse files

changed default port 8080 -> 5000.

  • Loading branch information...
1 parent e8702c2 commit e80b676c2ea91724aed6d72b91ed23af72c48520 @fukamachi committed Mar 17, 2011
Showing with 6 additions and 6 deletions.
  1. +1 −1 README.markdown
  2. +3 −3 src/core/clack.lisp
  3. +2 −2 src/core/handler/hunchentoot.lisp
View
2 README.markdown
@@ -13,7 +13,7 @@ Clack is a Web Application Environment for Common Lisp inspired by Python's WSGI
#'(lambda (req)
'(200 (:content-type "text/plain") ("Hello, Clack!"))))
-Now access [http://localhost:8080/](http://localhost:8080/) and Clack may show you "Hello, Clack!".
+Now access [http://localhost:5000/](http://localhost:5000/) and Clack may show you "Hello, Clack!".
## Installation
View
6 src/core/clack.lisp
@@ -36,11 +36,11 @@ Example:
(clackup (lambda (req)
(declare (ignore req))
'(200 nil (\"ok\")))
- :port 8080
+ :port 5000
:debug t)
"
@export
-(defun clackup (app &key (server :hunchentoot) (port 8080) debug)
+(defun clackup (app &key (server :hunchentoot) (port 5000) debug)
(let ((handler (find-handler server)))
(funcall (intern "RUN" handler) app
:port port
@@ -62,7 +62,7 @@ Clack main package just for convenience.
(clackup (lambda (req)
(declare (ignore req))
'(200 nil (\"Hello, Clack!\")))
- :port 8080
+ :port 5000
:debug t)
"
View
4 src/core/handler/hunchentoot.lisp
@@ -25,7 +25,7 @@
*default-content-type* "text/html; charset=utf-8"))
@export
-(defun run (app &key debug (port 8080))
+(defun run (app &key debug (port 5000))
"Start Hunchentoot server."
(initialize)
(when debug
@@ -173,7 +173,7 @@ Clack.Handler.Hunchentoot - Clack handler for Hunchentoot.
;; Start Server
(run (lambda (req)
'(200 nil (\"ok\")))
- :port 8080)
+ :port 5000)
"
@doc:DESCRIPTION "

0 comments on commit e80b676

Please sign in to comment.
Something went wrong with that request. Please try again.