Index: openacs-4/packages/dotlrn/www/admin/user-new-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user-new-2.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/dotlrn/www/admin/user-new-2.tcl	1 Feb 2002 21:46:22 -0000	1.12
+++ openacs-4/packages/dotlrn/www/admin/user-new-2.tcl	1 Feb 2002 22:20:50 -0000	1.13
@@ -3,6 +3,7 @@
 
     @author Ben Adida (ben@openforce.net)
     @creation-date 2001-11-04
+    @version $Id$
 } -query {
     user_id
     {referer "users"}
@@ -40,7 +41,13 @@
     ad_script_abort
 }
 
-db_1row select_user_info "select first_names,last_name from registered_users where user_id= :user_id"
+db_1row select_user_info {
+    select first_names,
+           last_name
+    from registered_users
+    where user_id = :user_id
+}
 
 set context_bar {{users Users} New}
+
 ad_return_template