im_user_intranet_admin_p db user_idWhat it does:
returns 1 if the user is an intranet admin (ignores site-wide admin permissions)Defined in: /web/philip/tcl/intranet-defs.tcl
Source code:
return [ad_administration_group_member $db [ad_parameter IntranetGroupType intranet intranet] "" $user_id]