diff tests/utest.ur @ 36:df258dbf4739

Merge Adam's upstream changes and update tests.
author Karn Kallio <kkallio@eka>
date Thu, 21 Apr 2011 20:06:46 -0430
parents 90b8ce9be9f5
children 9f392276d614
line wrap: on
line diff
--- a/tests/utest.ur	Wed Apr 20 15:45:27 2011 -0430
+++ b/tests/utest.ur	Thu Apr 21 20:06:46 2011 -0430
@@ -29,6 +29,8 @@
                                   val formClass = inputs
 
                                   val fakeId = None
+
+                                  structure CtlDisplay = OpenidUser.DefaultDisplay
                               end)
 
 fun wrap title body =
@@ -37,7 +39,7 @@
       <title>{[title]}</title>
     </head><body>
       {userStuff.Status}<br/>
-      {userStuff.Other}
+      {userStuff.Other.Xml}
 
       <h1>{[title]}</h1>