summaryrefslogtreecommitdiff
path: root/tests/task_cookie.ur
blob: 39f49b0a9d0f72db8296515805b18c4d7820f3b2 (plain)
1
2
3
4
5
6
7
8
9
cookie myCookie: {Value: string}

fun main (): transaction page = return <xml></xml>

task initialize = fn () => 
  c <- getCookie myCookie;
  case c of
      None => debug "No cookie"
    | Some {Value = v} => debug ("Cookie value: " ^ v)