diff options
author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-06-26 23:39:44 +0200 |
---|---|---|
committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-06-27 00:21:35 +0200 |
commit | c6bd4a2a9ceb6d30b30765f9f8d2f46b27367435 (patch) | |
tree | f639d963912562fc0d9f80c9c82abd629d6b4af1 /src | |
parent | 3fa20c06d56f3fe66ff3835e2363f04453c7c06e (diff) |
fixup! Implement the POST method for the server
Diffstat (limited to 'src')
-rw-r--r-- | src/scm/webid-oidc/errors.scm | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/src/scm/webid-oidc/errors.scm b/src/scm/webid-oidc/errors.scm index 5f07644..fd5d9c6 100644 --- a/src/scm/webid-oidc/errors.scm +++ b/src/scm/webid-oidc/errors.scm @@ -1393,8 +1393,12 @@ (format #f (G_ "the client wants to create a resource at ~s, which is reserved for an auxiliary resource") (get 'path))) ((&forbidden) - (format #f (G_ "the operation on ~s by ~s is refused, because it’s not by ~s and the access control forbids the following mode of operation: ~s") - (get 'path) (uri->string (get 'user)) (uri->string (get 'owner)) + (format #f (G_ "the operation on ~s by ~a is refused, because it’s not by ~s and the access control forbids the following mode of operation: ~s") + (get 'path) + (if (get 'user) + (uri->string (get 'user)) + (G_ "an anonymous user")) + (uri->string (get 'owner)) (uri->string (get 'mode)))) ((&precondition-failed) (if (get 'real-etag) |