diff options
| -rw-r--r-- | src/defendpoint.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/defendpoint.lisp b/src/defendpoint.lisp index df10967..16f33a8 100644 --- a/src/defendpoint.lisp +++ b/src/defendpoint.lisp @@ -154,7 +154,7 @@ PART is either (<method> :match (:or= :get :post :put :patch :head :delete)) (<pathspec> - :match (:seq (:or= :to :route) (:+ <pathpart>)) + :match (:seq (:or= :to :at :route) (:+ <pathpart>)) :then second) (<pathpart> :match (:item) @@ -193,7 +193,7 @@ PART is either (<metaclass> :match (:seq (:= :custom) <classname>) :if (mop:subclassp (second <metaclass>) 'endpoint) - :then (list :metaclass (second <metaclass>)) + :then (cons :metaclass (second <metaclass>)) :note "SYMBOL naming a subclass of ENDPOINT") (<var> :match (:seq (:= :var) (:item)) |