Index: openacs-4/packages/logger/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/index.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/logger/www/index.tcl 1 May 2003 07:20:16 -0000 1.4 +++ openacs-4/packages/logger/www/index.tcl 1 May 2003 10:01:00 -0000 1.5 @@ -13,7 +13,7 @@ } set package_id [ad_conn package_id] -set user_id [ad_conn user_id] +set current_user_id [ad_conn user_id] set admin_p [permission::permission_p -object_id $package_id -privilege admin] ########### @@ -184,7 +184,7 @@ # We always show the current user in the user filter so if we are showing "my entries" carry over the selected_user_id # when selecting a project set url_export_list {{selected_project_id $project_id}} - if { [string equal $selected_user_id $user_id] } { + if { [string equal $selected_user_id $current_user_id] } { lappend url_export_list selected_user_id } set url "index?[export_vars $url_export_list]" @@ -264,7 +264,7 @@ where ao.object_id = le.entry_id and submitter.user_id = ao.creation_user and ([ad_decode $where_clauses "" "" "[join $where_clauses "\n and "]"] - or submitter.user_id = :user_id + or submitter.user_id = :current_user_id ) group by submitter.user_id, submitter.first_names, submitter.last_name " {