Index: openacs-4/packages/xowf/tcl/xowf-form-field-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/xowf-form-field-procs.tcl,v
diff -u -N -r1.8 -r1.8.2.1
--- openacs-4/packages/xowf/tcl/xowf-form-field-procs.tcl	5 Sep 2018 18:22:32 -0000	1.8
+++ openacs-4/packages/xowf/tcl/xowf-form-field-procs.tcl	23 Jul 2019 17:20:17 -0000	1.8.2.1
@@ -199,7 +199,7 @@
   }
   role_member instproc render_input {} {
     #:msg role=${:role},obj=${:object}
-    if {[info commands ::xo::role::${:role}] ne ""} {
+    if {[nsf::is object ::xo::role::${:role}]} {
       set object_id [::xo::role::${:role} get_object_id ${:object}]
       set :options [::xo::role::${:role} get_members -object_id $object_id]
     } elseif {[set gid [group::get_id -group_name ${:role}]] ne ""} {