Author: hannes
Date: Wed Apr 19 21:36:58 2006
New Revision: 10696
Modified:
trunk/libraries/koala/sources/examples/buddha/buddha.dylan
Log:
Bug: 7257
*minor fixes
Modified: trunk/libraries/koala/sources/examples/buddha/buddha.dylan
==============================================================================
--- trunk/libraries/koala/sources/examples/buddha/buddha.dylan (original)
+++ trunk/libraries/koala/sources/examples/buddha/buddha.dylan Wed Apr 19
21:36:58 2006
@@ -220,9 +220,7 @@
request :: <request>,
response :: <response>,
#key errors = #())
- let username = logged-in(request);
- let user = element(*users*, username, default: #f);
- if (user & user.admin?)
+ if (*user* & *user*.admin?)
let out = output-stream(response);
with-buddha-template(out, "User management")
collect(show-errors(errors));
--
Gd-chatter mailing list
Gd-chatter@xxxxxxxxxxxxxxxx
https://www.gwydiondylan.org/mailman/listinfo/gd-chatter
|
