diff --git a/backplane-dns.lisp b/backplane-dns.lisp index 09b330f..90291aa 100644 --- a/backplane-dns.lisp +++ b/backplane-dns.lisp @@ -266,7 +266,7 @@ :sender sender :request request)) -(defmethod backplane-server::parse-message (sender (service (eql :DNS)) api-version message msg-id) +(defmethod backplane-dns:parse-message (sender (service (eql :DNS)) api-version message msg-id) (parse-dns-message sender (symbolize (cdr (assoc :REQUEST message))) message msg-id)) (defun backplane-dns-listen (&key diff --git a/package.lisp b/package.lisp index ba03f66..56911cb 100644 --- a/package.lisp +++ b/package.lisp @@ -12,7 +12,6 @@ #:backplane-connect #:make-error #:make-success - #:parse-message #:with-backplane) (:import-from #:ip-utils #:ipv4-p