Skip to content
Browse files

undo

  • Loading branch information...
1 parent 39afb33 commit fded90b3fd55f83cf58f3be6b3c720f134711090 @mck- committed Apr 5, 2012
Showing with 5 additions and 6 deletions.
  1. +5 −6 src/hello-world.lisp
View
11 src/hello-world.lisp
@@ -19,7 +19,7 @@ TODO: cleanup code."
(list database user password host)))
;; Handlers
-(push (hunchentoot:create-folder-dispatcher-and-handler "static/" "public/")
+(push (hunchentoot:create-folder-dispatcher-and-handler "/static/" "/app/public/")
hunchentoot:*dispatch-table*)
(hunchentoot:define-easy-handler (hello-sbcl :uri "/") ()
@@ -39,8 +39,7 @@ TODO: cleanup code."
(:div
(:a :href "static/hello.txt" "hello"))
(:h3 "App Database")
- (:p (format s "DATABASE_URL: ~A" *database-url*))))))
- ;; (:div
- ;; (:pre "SELECT version();"))
- ;; (:div (format s "~A" (postmodern:with-connection (db-params)
- ;; (postmodern:query "select version()"))))))))
+ (:div
+ (:pre "SELECT version();"))
+ (:div (format s "~A" (postmodern:with-connection (db-params)
+ (postmodern:query "select version()"))))))))

0 comments on commit fded90b

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