Commit 69e1e2bb4e261d994e47270f2e91a9c107ce2b57

Authored by Cédric RICARD
1 parent 8c73cb62

Added: Web arguments are passed to the 'compute_page' function, allowing to fill…

… forms with previously entered values.
Showing 1 changed file with 3 additions and 3 deletions   Show diff stats
calexium_lib/web/CXM_making_a_web_site.anubis
@@ -438,7 +438,7 @@ public define Web_Site @@ -438,7 +438,7 @@ public define Web_Site
438 List(Web_arg), 438 List(Web_arg),
439 Bool is_https) -> (Maybe($SessionTicket), Maybe($State), List(HTTP_header)) ticket_lost_state, 439 Bool is_https) -> (Maybe($SessionTicket), Maybe($State), List(HTTP_header)) ticket_lost_state,
440 List(Web_Action($SessionTicket, $State)) actions, 440 List(Web_Action($SessionTicket, $State)) actions,
441 - (Maybe($SessionTicket), Maybe($State)) -> HTML_Page compute_page, 441 + (Maybe($SessionTicket), Maybe($State), List(Web_arg) lwa) -> HTML_Page compute_page,
442 Int32 timeout, // seconds (todo: minutes) 442 Int32 timeout, // seconds (todo: minutes)
443 List(Redirection) redirections, 443 List(Redirection) redirections,
444 String charset, 444 String charset,
@@ -2204,7 +2204,7 @@ public define Web_Site @@ -2204,7 +2204,7 @@ public define Web_Site
2204 List(Web_arg), 2204 List(Web_arg),
2205 Bool is_https) -> (Maybe($SessionTicket), Maybe($State), List(HTTP_header)) ticket_lost_state, 2205 Bool is_https) -> (Maybe($SessionTicket), Maybe($State), List(HTTP_header)) ticket_lost_state,
2206 List(Web_Action($SessionTicket, $State)) actions, 2206 List(Web_Action($SessionTicket, $State)) actions,
2207 - (Maybe($SessionTicket), Maybe($State)) -> HTML_Page compute_page, 2207 + (Maybe($SessionTicket), Maybe($State), List(Web_arg) lwa) -> HTML_Page compute_page,
2208 Int32 timeout, 2208 Int32 timeout,
2209 Redirections redirections, 2209 Redirections redirections,
2210 String charset, 2210 String charset,
@@ -2280,7 +2280,7 @@ public define Web_Site @@ -2280,7 +2280,7 @@ public define Web_Site
2280 (headers, 2280 (headers,
2281 format(info(host_name, http_port, https_port, site_directory, secret), 2281 format(info(host_name, http_port, https_port, site_directory, secret),
2282 state_name, 2282 state_name,
2283 - compute_page(session_ticket, mb_new_state), 2283 + compute_page(session_ticket, mb_new_state, operands),
2284 is_https, 2284 is_https,
2285 charset)) 2285 charset))
2286 }), 2286 }),