[LON-CAPA-cvs] cvs: loncom /interface lonsimplepage.pm

[raeburn]

raeburn		Thu Jul 20 11:03:01 2006 EDT

  Modified files:              
    /loncom/interface	lonsimplepage.pm 
  Log:
  Display of group tools links was not occurring for user with 'mdg' privilege in one particular case.  Now displayed.
  
  
Index: loncom/interface/lonsimplepage.pm
diff -u loncom/interface/lonsimplepage.pm:1.45 loncom/interface/lonsimplepage.pm:1.46
--- loncom/interface/lonsimplepage.pm:1.45	Wed Jul 19 23:11:52 2006
+++ loncom/interface/lonsimplepage.pm	Thu Jul 20 11:03:01 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Simple Page Editor
 #
-# $Id: lonsimplepage.pm,v 1.45 2006/07/20 03:11:52 raeburn Exp $
+# $Id: lonsimplepage.pm,v 1.46 2006/07/20 15:03:01 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -182,7 +182,7 @@
     }
 
     if ($forcestudent or $target eq 'tex') { $allowed=0; }
-    
+
     if ($allowed) {
 	$r->print('<p>'.
 		  &Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes','Help with filling in text boxes').'<br /><a href="'.$r->uri.'?forcestudent=1'.$refarg.'"><font size="+1">'.&mt('Show Student View').'</font></a>'.
@@ -235,8 +235,8 @@
 
 # ---------------------------------------------------------------- Get syllabus
     if ((($syllabus{'uploaded.lastmodified'}) && 
-         (($group ne '' && ($group_home_view || $group_edit_perm || 
-           $group_view_perm)) || ($group eq ''))) || ($allowed)) { 
+         (($group ne '' && ($group_home_view || $group_edit_perm ||  
+           $group_view_perm)) || ($group eq ''))) || ($allowed)) {
 	if ($syllabus{'uploaded.photourl'}) {
 	    &Apache::lonnet::allowuploaded('/adm/smppg',
 					   $syllabus{'uploaded.photourl'});
@@ -258,7 +258,8 @@
 		      '</form><form method="post">');
 	}
 	foreach (sort keys %syllabusfields) {
-	    if (($syllabus{$_}) || ($allowed)) {
+	    if (($syllabus{$_}) || ($allowed) || 
+                ($_ eq 'abb_links' && $group ne '')) {
 		my $message=$syllabus{$_};
 		&Apache::lonfeedback::newline_to_br(\$message);
 		$message