--- loncom/interface/loncoursegroups.pm	2006/06/23 00:22:58	1.25
+++ loncom/interface/loncoursegroups.pm	2006/06/28 16:00:05	1.27
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: loncoursegroups.pm,v 1.25 2006/06/23 00:22:58 raeburn Exp $
+# $Id: loncoursegroups.pm,v 1.27 2006/06/28 16:00:05 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1088,7 +1088,6 @@ sub group_members {
         $$group_info{'totalmembers'} = 'Unknown - an error occurred';
         return $tmp;
     }
-    my $now = time;
     my $totalmembers = 0;
     my $active = 0;
     my $previous = 0;
@@ -2981,7 +2980,7 @@ sub process_membership {
                 }
             } else {
                 if (@{$defprivs} > 0) {
-                    foreach my $priv (@{$defprivs}) {
+                    if (grep/^\Q$priv\E$/,@{$defprivs}) {
                         foreach my $user (sort(keys(%{$usertools}))) {
                             if ($$usertools{$user}{$tool}) {
                                 $group_privs{$user} .= $priv.':';