Index: openacs.org-dev/packages/bookmarks/www/bookmark-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs.org-dev/packages/bookmarks/www/bookmark-delete.tcl,v diff -u -r1.1.1.1 -r1.1.1.2 --- openacs.org-dev/packages/bookmarks/www/bookmark-delete.tcl 9 Jul 2002 17:35:01 -0000 1.1.1.1 +++ openacs.org-dev/packages/bookmarks/www/bookmark-delete.tcl 8 Oct 2002 15:46:56 -0000 1.1.1.2 @@ -12,15 +12,15 @@ in December 2000. @creation-date December 2000 - @cvs-id $Id: + @cvs-id $Id$ } { bookmark_id:integer viewed_user_id:integer return_url } -properties { page_title:onevalue - context_bar_args:onevalue + context:onevalue bookmark_title:onevalue contained_bookmarks:multirow return_url @@ -32,7 +32,7 @@ set page_title "Confirm Deletion" -set context_bar_args "\[list bookmark-edit?bookmark_id=$bookmark_id&viewed_user_id=$viewed_user_id \"Edit Bookmark\"\] \"$page_title\"" +set context [list [list bookmark-edit?bookmark_id=$bookmark_id&viewed_user_id=$viewed_user_id "Edit Bookmark"] $page_title] set bookmark_title [db_string bookmark_title "select local_title from bm_bookmarks where bookmark_id = :bookmark_id"]