diff --git a/backplane-server.lisp b/backplane-server.lisp index 7b69e63..6ccced2 100644 --- a/backplane-server.lisp +++ b/backplane-server.lisp @@ -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