Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl,v
diff -u -r1.98.2.12 -r1.98.2.13
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	25 Jan 2022 17:33:19 -0000	1.98.2.12
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	15 Feb 2022 16:57:58 -0000	1.98.2.13
@@ -572,6 +572,7 @@
                extract(day from current_timestamp - password_changed_date) as password_age_days,
                u.auth_token,
                mm.rel_id,
+               case when (mr.member_state = 'approved') then 't' else 'f' end  as registered_user_p,
                mr.member_state = 'approved' as registered_user_p,
                mr.member_state
         from users u