Index: openacs-4/packages/dotlrn/www/one-community.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/one-community.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/dotlrn/www/one-community.tcl	6 Oct 2001 18:24:42 -0000	1.1
+++ openacs-4/packages/dotlrn/www/one-community.tcl	7 Oct 2001 19:21:08 -0000	1.2
@@ -18,9 +18,13 @@
 # What community type are we at?
 set community_id [dotlrn_community::get_community_id]
 
+# Get basic information
+db_1row select_community_info {}
+
 # Check that this user is a member
-if {[dotlrn_community::member_p $community_id $user_id]} {
+if {![dotlrn_community::member_p $community_id $user_id]} {
     ad_return_template one-community-not-member
+    return
 } else {
     # Pull out the NPP page ID and render it!
     set page_id [dotlrn_community::get_page_id $community_id $user_id]