Index: openacs-4/packages/xowiki-portlet/www/xowiki-admin-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki-portlet/www/xowiki-admin-portlet.tcl,v diff -u -r1.8 -r1.9 --- openacs-4/packages/xowiki-portlet/www/xowiki-admin-portlet.tcl 7 Aug 2017 23:48:31 -0000 1.8 +++ openacs-4/packages/xowiki-portlet/www/xowiki-admin-portlet.tcl 7 Apr 2018 18:05:33 -0000 1.9 @@ -11,7 +11,7 @@ return_url:localurl,optional } -if {([info exists package_id] && $package_id ne "")} { +if {[info exists package_id] && $package_id ne ""} { set xowiki_package_id $package_id } elseif {[info exists cf]} { array set config $cf @@ -24,11 +24,11 @@ ::xowiki::Package initialize -package_id $xowiki_package_id set applet_url [::$xowiki_package_id package_url] -if {(![info exists template_portal_id] || $template_portal_id eq "")} { +if {![info exists template_portal_id] || $template_portal_id eq ""} { set template_portal_id [dotlrn_community::get_portal_id] } -if {![info exists referer] && ([info exists return_url] && $return_url ne "")} { +if {![info exists referer] && [info exists return_url] && $return_url ne ""} { set referer $return_url }