show dispatch table.

jsmpereira · Mar 13, 2012 · 60e6195 · 60e6195
1 parent 6bd0f0a
commit 60e6195
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/hello-world.lisp b/src/hello-world.lisp
@@ -2,6 +2,7 @@
 
 (hunchentoot:define-easy-handler (hello-sbcl :uri "/hello-sbcl") (name)
   (setf (hunchentoot:content-type*) "text/plain")
+  (format nil "~a" hunchentoot:*dispatch-table*)
   (format nil "Hey~@[ ~A~]! ~A ~A, Hunchentoot ~A" name (lisp-implementation-type) (lisp-implementation-version) hunchentoot::*hunchentoot-version*))