Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v
diff -u -r1.213 -r1.214
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	29 Sep 2017 13:54:16 -0000	1.213
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	14 Nov 2017 15:46:45 -0000	1.214
@@ -848,7 +848,7 @@
     } {
         Approve membership to a community
     } {
-        db_1row select_rel_info {}
+        set rel_id [db_string select_rel_info {}]
 
         db_transaction {
             membership_rel::approve -rel_id $rel_id