Index: openacs-4/packages/acs-templating/tcl/apm-callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/apm-callback-procs.tcl,v diff -u -N -r1.4.4.1 -r1.4.4.2 --- openacs-4/packages/acs-templating/tcl/apm-callback-procs.tcl 24 Jul 2009 14:12:31 -0000 1.4.4.1 +++ openacs-4/packages/acs-templating/tcl/apm-callback-procs.tcl 22 Apr 2010 08:13:51 -0000 1.4.4.2 @@ -61,12 +61,14 @@ -package_id $package_id_templating \ -parameter "XinhaDefaultPlugins" \ -default ""] - set del_pos [lsearch $plugins FullScreen] - set plugins [lreplace $plugins $del_pos $del_pos] - parameter::set_value \ - -package_id $package_id_templating \ - -parameter "XinhaDefaultPlugins" \ - -value $plugins + if { $plugins ne "" } { + set del_pos [lsearch $plugins FullScreen] + set plugins [lreplace $plugins $del_pos $del_pos] + parameter::set_value \ + -package_id $package_id_templating \ + -parameter "XinhaDefaultPlugins" \ + -value $plugins + } } } }