public
/
backplane-server
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Don't even supply a fallback

This commit is contained in:
Niten 2020-12-02 15:06:35 -08:00
parent 665f362ce1
commit d72210f7eb
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
backplane-server.lisp
View File

@ -55,9 +55,9 @@
(defgeneric parse-message (sender service api-version message msg-id)
(:documentation "Given an incoming message, turn it into the appropriate request."))
(defmethod parse-message (sender service api-version message msg-id)
(make-error :msg (format nil "unsupported service: ~A" service)
:msg-id msg-id))
;; (defmethod parse-message (sender service api-version message msg-id)
;; (make-error :msg (format nil "unsupported service: ~A" service)
;; :msg-id msg-id))
(defun decode-message (message-str)
(handler-case