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 -N -r1.222 -r1.223
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	8 Apr 2018 05:13:01 -0000	1.222
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	11 Apr 2018 10:12:52 -0000	1.223
@@ -1053,8 +1053,11 @@
 
 	if {$package_id ne ""} {
             set key ::dotlrn::community_id($package_id)
-            if {[info exists $key]} {set $key}
-	    return [set $key [dotlrn_community::get_community_id_not_cached -package_id $package_id]]
+            if {[info exists $key]} {
+                return [set $key]
+            } else {
+                return [set $key [dotlrn_community::get_community_id_not_cached -package_id $package_id]]
+            }
 	} else {
 	    return ""
 	}