Index: openacs-4/packages/xotcl-core/tcl/generic-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/generic-procs.tcl,v
diff -u -r1.65 -r1.66
--- openacs-4/packages/xotcl-core/tcl/generic-procs.tcl	19 May 2007 09:38:21 -0000	1.65
+++ openacs-4/packages/xotcl-core/tcl/generic-procs.tcl	22 May 2007 15:09:13 -0000	1.66
@@ -908,11 +908,11 @@
     set sql [::xo::db::sql select \
 		 -map_function_names true \
 		 -vars "ci.name, n.revision_id as version_id,\
-                        person__name(n.creation_user)] as author, \
+                        person__name(n.creation_user) as author, \
                         n.creation_user as author_id, \
                         to_char(n.last_modified,'YYYY-MM-DD HH24:MI:SS') as last_modified_ansi,\
                         n.description,\
-                        acs_permission__permission_p(n.revision_id,:user_id,'admin')] as admin_p,\
+                        acs_permission__permission_p(n.revision_id,:user_id,'admin') as admin_p,\
                         acs_permission__permission_p(n.revision_id,:user_id,'delete') as delete_p,\
                         r.content_length,\
                         content_revision__get_number(n.revision_id) as version_number " \