diff --git a/calexium_lib/web/CXM_making_a_web_site.anubis b/calexium_lib/web/CXM_making_a_web_site.anubis index 33c5293..ad26de2 100644 --- a/calexium_lib/web/CXM_making_a_web_site.anubis +++ b/calexium_lib/web/CXM_making_a_web_site.anubis @@ -2127,7 +2127,9 @@ public define Web_Site String site_directory, String state_directory, One -> One init, - (HTTP_Info) -> (Maybe($SessionTicket), Maybe($State), List(HTTP_header)) initial_state, + (HTTP_Info, + List(Web_arg), + Bool is_https) -> (Maybe($SessionTicket), Maybe($State), List(HTTP_header)) initial_state, ($State expired, HTTP_Info, List(Web_arg), @@ -2181,7 +2183,7 @@ public define Web_Site failure then if mb_action_name is { - failure then initial_state(http_info), + failure then initial_state(http_info, lwa, is_https), success(action_name) then apply_action(failure,action_name,http_info,operands,is_https) }, @@ -2190,7 +2192,7 @@ public define Web_Site not_found then if mb_action_name is { - failure then initial_state(http_info), + failure then initial_state(http_info, lwa, is_https), success(_) then ticket_lost_state(http_info,lwa,is_https) }, -- libgit2 0.21.4