--- loncom/lonnet/perl/lonnet.pm	2009/07/20 23:33:11	1.1005
+++ loncom/lonnet/perl/lonnet.pm	2009/07/25 14:44:55	1.1006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.1005 2009/07/20 23:33:11 raeburn Exp $
+# $Id: lonnet.pm,v 1.1006 2009/07/25 14:44:55 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1326,7 +1326,7 @@ sub get_domain_defaults {
         }
     }
     if (ref($domconfig{'requestcourses'}) eq 'HASH') {
-        foreach my $item ('official','unofficial') {
+        foreach my $item ('official','unofficial','community') {
             $domdefaults{$item} = $domconfig{'requestcourses'}{$item};
         }
     }
@@ -4635,6 +4635,7 @@ sub usertools_access {
         %tools = (
                       official   => 1,
                       unofficial => 1,
+                      community  => 1,
                  );
     } else {
         %tools = (