fixed compilation of the filter example

This commit is contained in:
2013-11-20 09:16:28 +01:00
parent 33fd3c8009
commit 3d126b04a9

View File

@@ -21,10 +21,14 @@ feature -- Basic operations
execute (req: WSF_REQUEST; res: WSF_RESPONSE) execute (req: WSF_REQUEST; res: WSF_RESPONSE)
-- Execute the filter -- Execute the filter
local local
l_auth: HTTP_AUTHORIZATION l_auth: detachable HTTP_AUTHORIZATION
do do
create l_auth.make (req.http_authorization) if attached req.http_authorization as l_http_authorization then
if (attached l_auth.type as l_auth_type and then l_auth_type.is_equal ("basic")) and create l_auth.make (l_http_authorization)
end
if
l_auth /= Void and then
(attached l_auth.type as l_auth_type and then l_auth_type.same_string ("basic")) and then
attached l_auth.login as l_auth_login and then attached l_auth.login as l_auth_login and then
attached Db_access.user (0, l_auth_login) as l_user and then attached Db_access.user (0, l_auth_login) as l_user and then
l_auth_login.same_string (l_user.name) and then l_auth_login.same_string (l_user.name) and then