Method: (SHARED-INITIALIZE AFTER INEXISTENT-REQUEST-PART T)

Source

(defmethod shared-initialize :after ((err inexistent-request-part) slot-names &rest other-args)
  (declare (ignore slot-names other-args))
  (when (and (boundp '*context*) *context*)
    (setf (rerl-error.query-path err) (query-path (context.request *context*)))))