Plaster

(defmethod handle-api-condition ((caller-classification webhook) condition processor &rest args) (destructuring-bind (&key client url &allow-other-keys) args (cond ((webhook-already-exists-p processor condition) (let ((con (make-condition 'webhook-already-exists :processor processor :c condition :url url))) (with-condition-restarts con (list (find-restart 'delete-and-retry)) (error con)))) ((webhook-limit-exceeded-p processor condition) (let ((con (make-condition 'no-more-space :client client :c condition :processor processor))) (with-condition-restarts con (list (find-restart 'clear-our-webhooks-and-retry)) (error con)))) (t (log:error "Couldn't determine webhook condition problem. Please impl") (error 'indeterminate-condition :c condition :processor processor)))))