--- loncom/interface/loncoursegroups.pm	2006/07/07 21:25:02	1.49
+++ loncom/interface/loncoursegroups.pm	2006/07/08 01:16:30	1.51
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: loncoursegroups.pm,v 1.49 2006/07/07 21:25:02 raeburn Exp $
+# $Id: loncoursegroups.pm,v 1.51 2006/07/08 01:16:30 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -273,7 +273,7 @@ END
                     if ($action eq 'modify' || $action eq 'delete') {
                         $link .= $group;
                     } else {
-                        $link .= $group.'/smppg';
+                        $link .= $group.'/smppg?ref=grouplist';
                     }
                     $link .= '">'.$lt{$action}.'</a>';
                     if ($action eq 'view') { 
@@ -330,7 +330,7 @@ END
                     my $description = &unescape(
                                         $group_info{description});
                     my ($uname,$udom) = split(/:/,$group_info{creator});
-                    $r->print('<font size="+1"><a href="/adm/'.$udom.'/'.$uname.'/'.$group.'/smppg">'.$group,'</a><font><br /><small>'.$description.'</small><br /><br />');
+                    $r->print('<font size="+1"><a href="/adm/'.$udom.'/'.$uname.'/'.$group.'/smppg?ref=grouplist">'.$group,'</a><font><br /><small>'.$description.'</small><br /><br />');
                 }
             }
         } else {
@@ -1288,7 +1288,7 @@ END
     $r->print('&nbsp;<input type="text" name="quota" size="4" />Mb');
     if ($action eq 'create') {
         $r->print('<br />'.
-                  &mt('A total of [_1] Mb is shared between all [_2]s in the '.
+                  &mt('A total of [_1] Mb can be divided amongst all [_2]s in the '.
                   '[_3], and [_4] Mb are currently unallocated.',$crsquota,
                   $gpterm,lc($crstype),$freespace));
     } else {
@@ -2295,7 +2295,7 @@ sub change_privs_form {
     my $exp_or_del = 0;
     if (ref($$memchg{'deletion'}) eq 'ARRAY') {
         if (@{$$memchg{'deletion'}} > 0) {
-            $r->print('<tr><td>&nbsp;</td><td colspan="3"><b>'.$lt{'tode'}.':</b><br /><ul>');
+            $r->print('<b>'.$lt{'tode'}.':</b><br /><ul>');
             foreach my $user (@{$$memchg{'deletion'}}) {
                 $r->print('<li>'.$$userdata{$user}[$$idx{fullname}].
                           '&nbsp;('.$user.')</li>');
@@ -2306,7 +2306,7 @@ sub change_privs_form {
     }
     if (ref($$memchg{'expire'}) eq 'ARRAY') {
         if (@{$$memchg{'expire'}} > 0) {
-            $r->print('<tr><td>&nbsp;</td><td colspan="3"><b>'.$lt{'toex'}.':</b><br /><ul>');
+            $r->print('<b>'.$lt{'toex'}.':</b><br /><ul>');
             foreach my $user (@{$$memchg{'expire'}}) {
                 $r->print('<li>'.$$userdata{$user}[$$idx{fullname}].
                           '&nbsp;('.$user.')</li>');