From bffeb0e5a10ae58b8f7c3f5249b3665373236e21 Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Thu, 6 Nov 2008 12:08:41 -0500
Subject: Reading cookies works

---
 tests/cookie.ur | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'tests/cookie.ur')

diff --git a/tests/cookie.ur b/tests/cookie.ur
index 36734260..cb4f8854 100644
--- a/tests/cookie.ur
+++ b/tests/cookie.ur
@@ -2,7 +2,7 @@ cookie c : string
 
 fun main () : transaction page =
     setCookie c "Hi";
-    so <- requestHeader "Cookie";
+    so <- getCookie c;
     case so of
         None => return <xml>No cookie</xml>
       | Some s => return <xml>Cookie: {[s]}</xml>
-- 
cgit v1.2.3