Remove debug format statements
This commit is contained in:
parent
a993573859
commit
b8fad18047
2 changed files with 0 additions and 3 deletions
|
@ -32,7 +32,6 @@
|
|||
|
||||
(defmethod datastore-post-story
|
||||
((datastore pg-datastore) role necessity title content reporter)
|
||||
(format t "~s:~s:~s:~s:~s~%" role necessity title content reporter)
|
||||
(with-connection (connection-spec datastore)
|
||||
(let ((obj (make-instance
|
||||
'story :role role :necessity necessity :title title
|
||||
|
|
|
@ -75,8 +75,6 @@
|
|||
(necessity (hunchentoot:post-parameter "necessity"))
|
||||
(title (hunchentoot:post-parameter "headline"))
|
||||
(content (hunchentoot:post-parameter "content")))
|
||||
(format t "~s;~s;~s;~s;~s~%" role necessity title content
|
||||
(hunchentoot:session-value :username))
|
||||
(post-story role necessity title content
|
||||
(hunchentoot:session-value :username))
|
||||
200)
|
||||
|
|
Loading…
Reference in a new issue