Index: openacs-4/packages/wp-slim/www/edit-slide.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/www/Attic/edit-slide.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/wp-slim/www/edit-slide.tcl 22 Sep 2003 18:41:27 -0000 1.7 +++ openacs-4/packages/wp-slim/www/edit-slide.tcl 29 Sep 2003 02:41:33 -0000 1.8 @@ -25,8 +25,10 @@ set user_id [ad_verify_and_get_user_id] permission::require_permission -party_id $user_id -object_id $pres_item_id -privilege wp_edit_presentation -set context [list "presentation-top?[export_url_vars pres_item_id] {presentation}" "[_ wp-slim.Edit_Slide]"] +db_1row get_presentation {} +set context [list "presentation-top?[export_url_vars pres_item_id] {$pres_title}" "[_ wp-slim.Edit_Slide]"] + db_1row get_slide_info { select s.slide_title, s.sort_key,