diff options
Diffstat (limited to 'src/scm/webid-oidc/errors.scm')
| -rw-r--r-- | src/scm/webid-oidc/errors.scm | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/src/scm/webid-oidc/errors.scm b/src/scm/webid-oidc/errors.scm index 76ce8af..80a4f37 100644 --- a/src/scm/webid-oidc/errors.scm +++ b/src/scm/webid-oidc/errors.scm @@ -885,6 +885,20 @@ path-not-found-path) (define-exception-type + &auxiliary-resource-absent + &external-error + make-auxiliary-resource-absent + auxiliary-resource-absent? + (path auxiliary-resource-absent-path) + (kind auxiliary-resource-absent-kind)) + +(export &auxiliary-resource-absent + make-auxiliary-resource-absent + auxiliary-resource-absent? + auxiliary-resource-absent-path + auxiliary-resource-absent-kind) + +(define-exception-type &uri-slash-semantics-error &external-error make-uri-slash-semantics-error @@ -1336,6 +1350,9 @@ ((&path-not-found) (format #f (G_ "no resource has been found to serve URI path ~s") (get 'path))) + ((&auxiliary-resource-absent) + (format #f (G_ "the resource kind ~s is absent for the resource at ~s") + (get 'kind') (get 'path))) ((&uri-slash-semantics-error) (format #f (G_ "no resource has been found to serve URI path ~s, but ~s exists") (get 'path) (get 'expected-path))) |