Anubis / Xlib

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
Inline Side-by-side
calexium_lib/web/CXM_making_a_web_site.anubis
  Show/Hide comments   View file @69e1e2b
... ... @@ -438,7 +438,7 @@ public define Web_Site
438 438 List(Web_arg),
439 439 Bool is_https) -> (Maybe($SessionTicket), Maybe($State), List(HTTP_header)) ticket_lost_state,
440 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 442 Int32 timeout, // seconds (todo: minutes)
443 443 List(Redirection) redirections,
444 444 String charset,
... ... @@ -2204,7 +2204,7 @@ public define Web_Site
2204 2204 List(Web_arg),
2205 2205 Bool is_https) -> (Maybe($SessionTicket), Maybe($State), List(HTTP_header)) ticket_lost_state,
2206 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 2208 Int32 timeout,
2209 2209 Redirections redirections,
2210 2210 String charset,
... ... @@ -2280,7 +2280,7 @@ public define Web_Site
2280 2280 (headers,
2281 2281 format(info(host_name, http_port, https_port, site_directory, secret),
2282 2282 state_name,
2283   - compute_page(session_ticket, mb_new_state),
  2283 + compute_page(session_ticket, mb_new_state, operands),
2284 2284 is_https,
2285 2285 charset))
2286 2286 }),
... ...