[login happens automatically after you register
thomashartman1@gmail.com**20080906154605] hunk ./src/Controller.hs 79
-      then do key <- update $ NewSession (SessionData user)
-              addCookie (3600) (mkCookie "sid" (show key)) 
-              redirectHome rq
+      then startsess user rq
hunk ./src/Controller.hs 82
+
+startsess user rq = do
+  key <- update $ NewSession (SessionData user)
+  addCookie (3600) (mkCookie "sid" (show key)) 
+  redirectHome rq 
hunk ./src/Controller.hs 110
-                            tutlayoutWeb rq [("newuser",user)] "newuser"
+                            -- let auth = UserAuthInfo user pass1
+                            -- tutlayoutWeb rq [("newuser",user)] "newuser"
+                            startsess user rq
hunk ./templates/menuNotLoggedIn.st 1
-$!           <a class="$ menustyleLogin $" href="/tutorial/login">login </a>
-           |<a class="$ menustyleRegister $" href="/tutorial/register">register </a>
-!$
-
-$ login() $
+<table><tr>
+  <td> $ login() $ </td>
+  $! <td> $ register() $ </td> !$
+</tr></table>
hunk ./templates/menubar.st 19
-     <td> $! login() !$ $ userMenu $ </td>
+     <td> $ userMenu $ </td>
hunk ./templates/register.st 1
-<div id="create">
-    <h1>Register</h1>
hunk ./templates/register.st 11
-</div>
+
hunk ./todo 22
-  After registration should be logged in automaticaly.
+  Login box should swap with register box in upper right hand corner when register link is clicked.
+  Register box should have a login link to swap it back?
+  There's if logic here somewheres
+
+  Red errors for login/register should appear below forms in upper right hand part of page.
+
+