X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/b7a3889e4b7911ee2427b6cdc89a6acfe97e06f4..284f1fa2ace3e276052ff1bd7d66442500e693da:/src/method-proto.lisp

diff --git a/src/method-proto.lisp b/src/method-proto.lisp
index 36237d6..60a10eb 100644
--- a/src/method-proto.lisp
+++ b/src/method-proto.lisp
@@ -86,7 +86,7 @@ (defclass method-entry ()
 	       :reader method-entry-chain-head)
    (chain-tail :initarg :chain-tail :type sod-class
 	       :reader method-entry-chain-tail)
-   (role :initarg :role :type (or :keyword null) :reader method-entry-role))
+   (role :initarg :role :type (or keyword null) :reader method-entry-role))
   (:documentation
    "An entry point into an effective method.