Index: openacs-4/packages/acs-subsite/lib/subsites.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/subsites.tcl,v
diff -u -N -r1.16 -r1.17
--- openacs-4/packages/acs-subsite/lib/subsites.tcl	7 Aug 2017 23:47:58 -0000	1.16
+++ openacs-4/packages/acs-subsite/lib/subsites.tcl	10 Dec 2018 16:25:57 -0000	1.17
@@ -9,8 +9,7 @@
                  -party_id [ad_conn untrusted_user_id]]
 
 set actions {}
-if {[info exists admin_p] 
-    && $admin_p } {
+if { $admin_p } {
     lappend actions [_ acs-subsite.Create_new_subsite] "[subsite::get_element -element url]admin/subsite-add" {}
 }