[Gd-chatter] r11398 - trunk/libraries/network/web-framework

[hannes at gwydiondylan.org]

Author: hannes
Date: Mon Jun 11 04:45:12 2007
New Revision: 11398

Modified:
   trunk/libraries/network/web-framework/users.dylan
Log:
Job: minor
remove unmatched end clause (this is method find-user)


Modified: trunk/libraries/network/web-framework/users.dylan
==============================================================================
--- trunk/libraries/network/web-framework/users.dylan	(original)
+++ trunk/libraries/network/web-framework/users.dylan	Mon Jun 11 04:45:12 2007
@@ -58,7 +58,7 @@
 define function find-user (name :: <string>)
  => (user :: false-or(<user>))
   element(storage(<user>), name, default: #f);
-end method check;
+end;
 
 define method login ()
   let redirect-url = get-query-value("redirect");