From d72210f7eb9a3bda5b80e8a3ec23db8efc7b1c34 Mon Sep 17 00:00:00 2001 From: Niten Date: Wed, 2 Dec 2020 15:06:35 -0800 Subject: [PATCH] Don't even supply a fallback --- backplane-server.lisp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) 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