Anubis / Xlib

Commit 440758699ef812272fb7de14dcbf8ff3016cc26b

Authored by Cédric RICARD
1 parent 235d10eb

Adding web arguments to the initial state handler

Showing 1 changed file with 5 additions and 3 deletions   Show diff stats
Inline Side-by-side
calexium_lib/web/CXM_making_a_web_site.anubis
  Show/Hide comments   View file @4407586
@@ -2127,7 +2127,9 @@ public define Web_Site @@ -2127,7 +2127,9 @@ public define Web_Site
2127 String site_directory, 2127 String site_directory,
2128 String state_directory, 2128 String state_directory,
2129 One -> One init, 2129 One -> One init,
2130 - (HTTP_Info) -> (Maybe($SessionTicket), Maybe($State), List(HTTP_header)) initial_state, 2130 + (HTTP_Info,
  2131 + List(Web_arg),
  2132 + Bool is_https) -> (Maybe($SessionTicket), Maybe($State), List(HTTP_header)) initial_state,
2131 ($State expired, 2133 ($State expired,
2132 HTTP_Info, 2134 HTTP_Info,
2133 List(Web_arg), 2135 List(Web_arg),
@@ -2181,7 +2183,7 @@ public define Web_Site @@ -2181,7 +2183,7 @@ public define Web_Site
2181 failure then 2183 failure then
2182 if mb_action_name is 2184 if mb_action_name is
2183 { 2185 {
2184 - failure then initial_state(http_info), 2186 + failure then initial_state(http_info, lwa, is_https),
2185 success(action_name) then 2187 success(action_name) then
2186 apply_action(failure,action_name,http_info,operands,is_https) 2188 apply_action(failure,action_name,http_info,operands,is_https)
2187 }, 2189 },
@@ -2190,7 +2192,7 @@ public define Web_Site @@ -2190,7 +2192,7 @@ public define Web_Site
2190 not_found then 2192 not_found then
2191 if mb_action_name is 2193 if mb_action_name is
2192 { 2194 {
2193 - failure then initial_state(http_info), 2195 + failure then initial_state(http_info, lwa, is_https),
2194 success(_) then 2196 success(_) then
2195 ticket_lost_state(http_info,lwa,is_https) 2197 ticket_lost_state(http_info,lwa,is_https)
2196 }, 2198 },