Method: (REGISTER-URL-HANDLER HTTPD-BACKEND STANDARD-ENTRY-POINT T)

Source

(defmethod register-url-handler ((backend httpd-backend) (entry-point standard-entry-point)
                                 handler-lambda)
  (let ((complete-url (strcat (application.url-prefix
                               (entry-point.application entry-point))
                              (entry-point.url entry-point))))
    (push (list (lambda (request-url)
                  (string= request-url complete-url))
                handler-lambda
                entry-point)
          (handlers backend))))