Index: openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl,v diff -u -r1.16 -r1.17 --- openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl 28 Oct 2003 08:47:42 -0000 1.16 +++ openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl 28 Oct 2003 10:56:16 -0000 1.17 @@ -31,7 +31,7 @@ if {$user_id == 0} { ad_maybe_redirect_for_registration } else { - ns_log Notice "$user_id doesn't have $privilege on object $object_id" + ns_log Warning "$user_id doesn't have $privilege on object $object_id" ad_return_forbidden "Permission Denied" "

You don't have permission to $privilege [db_string name {select acs_object.name(:object_id) from dual}].

" @@ -269,7 +269,7 @@ } } - ns_log "Notice" "Swept developer support information for [array size kill_requests] requests ($kill_count nsv elements)" + ns_log "Debug" "Swept developer support information for [array size kill_requests] requests ($kill_count nsv elements)" } ad_proc -private ds_trace_filter { conn args why } { Adds developer-support information about the end of sessions.} {