Index: openacs-4/packages/survey/www/admin/one.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/one.tcl,v
diff -u -N -r1.13.2.2 -r1.13.2.3
--- openacs-4/packages/survey/www/admin/one.tcl	9 Feb 2020 16:10:31 -0000	1.13.2.2
+++ openacs-4/packages/survey/www/admin/one.tcl	17 Feb 2021 18:43:02 -0000	1.13.2.3
@@ -32,7 +32,7 @@
 
 # get users and # who responded etc...
 if {[apm_package_installed_p dotlrn]} {
-    set community_id [dotlrn_community::get_community_id_from_url]
+    set community_id [dotlrn_community::get_community_id_from_url -url [ad_conn url]]
     set n_eligible [db_string n_eligible {
         select count(*) from dotlrn_member_rels_full
         where rel_type='dotlrn_member_rel'