Index: openacs-4/packages/dotlrn/www/admin/user-nuke.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user-nuke.tcl,v diff -u -r1.4 -r1.4.2.1 --- openacs-4/packages/dotlrn/www/admin/user-nuke.tcl 13 Jan 2005 13:57:22 -0000 1.4 +++ openacs-4/packages/dotlrn/www/admin/user-nuke.tcl 31 May 2005 23:13:07 -0000 1.4.2.1 @@ -13,14 +13,10 @@ #Pages in this directory are only runnable by dotlrn-wide admins. dotlrn::require_admin -db_1row select_user_info { - select email, - first_names, - last_name - from cc_users - where user_id = :user_id -} +db_1row select_user_info {} +set pretty_last_visit [lc_time_fmt $last_visit "%Q %T"] + form create confirm_delete element create confirm_delete user_id \