Index: openacs-4/packages/bookmarks/www/bookmarks-check.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bookmarks/www/bookmarks-check.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/bookmarks/www/bookmarks-check.tcl	11 Dec 2003 21:39:58 -0000	1.5
+++ openacs-4/packages/bookmarks/www/bookmarks-check.tcl	29 Jun 2004 10:17:48 -0000	1.6
@@ -25,7 +25,7 @@
 
 set page_title "Checking Bookmarks"
 
-set context [bm_context_bar_args "\"$page_title\"" $viewed_user_id]
+set context [bm_context_bar_args [list $page_title] $viewed_user_id]
 
 set package_id [ad_conn package_id]
 
@@ -56,7 +56,7 @@
 # We want to give the user something to look at before we start contacting
 # the foreign hosts
 set cmd [list ad_context_bar --]
-foreach elem [bm_context_bar_args "\"$page_title\"" $viewed_user_id] {
+foreach elem [bm_context_bar_args [list $page_title] $viewed_user_id] {
     lappend cmd $elem
 }
 set context_bar [eval $cmd]