Index: openacs-4/packages/dotlrn-homework/www/master.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/master.tcl,v diff -u -r1.1.1.1 -r1.1.1.1.6.1 --- openacs-4/packages/dotlrn-homework/www/master.tcl 17 Feb 2003 20:56:17 -0000 1.1.1.1 +++ openacs-4/packages/dotlrn-homework/www/master.tcl 9 Dec 2003 12:12:36 -0000 1.1.1.1.6.1 @@ -1 +1,5 @@ -set context_bar [eval ad_context_bar -node_id [site_node::get_parent_id -node_id [ad_conn node_id]] $context_bar] +set cmd [list ad_context_bar -node_id [site_node::get_parent_id -node_id [ad_conn node_id]] --] +foreach elem $context_bar { + lappend cmd $elem +} +set context_bar [eval $cmd]