Add hostname keyword

2013-07-07 23:59:02 +02:00 · 2013-07-07 23:59:02 +02:00 · acb5f812f6
commit acb5f812f6
parent a322d9802c
1 changed files with 2 additions and 3 deletions
--- a/util.lisp
+++ b/util.lisp
@ -1,9 +1,8 @@
 (in-package #:scrumli)

-(defun start-scrumli (&key
-                        (port 8080)
+(defun start-scrumli (&key hostname (port 8080)
                        (datastore 'scrumli.pg-datastore:pg-datastore)
                        datastore-init)
  (setf *datastore* (apply #'make-instance datastore datastore-init))
  (init)
-  (start '#:scrumli :port port))
+  (start '#:scrumli :port port :hostname hostname))