Index: openacs-4/packages/acs-developer-support/lib/footer.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-developer-support/lib/footer.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/acs-developer-support/lib/footer.tcl 11 Jan 2004 16:36:22 -0000 1.2 +++ openacs-4/packages/acs-developer-support/lib/footer.tcl 14 Jan 2004 09:05:47 -0000 1.3 @@ -2,6 +2,8 @@ # TODO: Go through request-processor to see what other information should be exposed to developer-support +# TODO: Always show comments inline by default? + if { $show_p } { set ds_url [ds_support_url] @@ -61,6 +63,8 @@ set set_user_url "${ds_url}/set-user" set export_vars [export_vars -form { { return_url [ad_return_url] } }] + + set unfake_url [export_vars -base $set_user_url { { user_id $real_user_id } { return_url [ad_return_url] } }] } }