--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/tests/formFields.ur Sat Jul 21 15:16:57 2012 -0400 @@ -0,0 +1,3 @@ +fun main (pb : postBody) : transaction page = return <xml><body> + {List.mapX (fn (n, v) => <xml><li>{[n]} = {[v]}</li></xml>) (postFields pb)} +</body></xml>