Index: openacs-4/packages/new-portal/tcl/portal-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs.tcl,v diff -u -r1.172.2.2 -r1.172.2.2.4.1 --- openacs-4/packages/new-portal/tcl/portal-procs.tcl 2 Dec 2003 16:07:59 -0000 1.172.2.2 +++ openacs-4/packages/new-portal/tcl/portal-procs.tcl 13 May 2004 16:01:21 -0000 1.172.2.2.4.1 @@ -2267,7 +2267,10 @@ set option_key [lindex $option 0] set option_val [lindex $option 2] if {![empty_string_p $options_set]} { - set option_val [ns_set get $options_set $option_key] + set options_set_val [ns_set get $options_set $option_key] + if { ![empty_string_p $options_set_val] } { + set option_val $options_set_val + } } set first_p 1