diff --git a/calexium_lib/web/CXM_making_a_web_site.anubis b/calexium_lib/web/CXM_making_a_web_site.anubis index 7dd34d5..a460a79 100644 --- a/calexium_lib/web/CXM_making_a_web_site.anubis +++ b/calexium_lib/web/CXM_making_a_web_site.anubis @@ -2038,6 +2038,7 @@ define (List(Web_arg) lwa) -> Separated_Web_Args($State) { web_arg(n, value) then with name = if substr(n,0,4) = "amp;" then substr(n, 4, length(n) - 4) else n, + println("--> " + name); if name = "s" then swa(success(retrieve_state(value)),an1,op1) else if name = "a" then @@ -2045,7 +2046,7 @@ define (List(Web_arg) lwa) -> Separated_Web_Args($State) else if name = "t" then swa(ps1,an1,[web_arg("target",value) . op1]) else - swa(ps1,an1,[wa_1 . op1]), + swa(ps1,an1,[web_arg(name,value) . op1]), upload(n,v,t) then swa(ps1,an1,[wa_1 . op1]) -- libgit2 0.21.4