[BACK]Return to lonfeedback.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonfeedback.pm between versions 1.210 and 1.211

version 1.210, 2006/07/18 17:31:50 version 1.211, 2006/07/18 17:42:15
Line 271  sub list_discussion { Line 271  sub list_discussion {
     my $imsresources;      my $imsresources;
     my $copyresult;      my $copyresult;
   
     my $grp_arg;  
     if ($group ne '') {  
         $grp_arg = &grp_args($group);  
     }   
   
     my $function = &Apache::loncommon::get_users_function();      my $function = &Apache::loncommon::get_users_function();
     my $color = &Apache::loncommon::designparm($function.'.tabbg',      my $color = &Apache::loncommon::designparm($function.'.tabbg',
                                                     $env{'user.domain'});                                                      $env{'user.domain'});
Line 340  sub list_discussion { Line 335  sub list_discussion {
     if ($newpostsflag) {      if ($newpostsflag) {
         $chglink .= '&previous='.$prevread;          $chglink .= '&previous='.$prevread;
     }      }
     if ($group ne '') {      $chglink.=&group_args($group);
         $chglink.='&'.$grp_arg;  
     }  
   
     if ($visible) {      if ($visible) {
 # Print the discusssion  # Print the discusssion
Line 421  imscp_v1p1.xsd http://www.imsglobal.org/ Line 414  imscp_v1p1.xsd http://www.imsglobal.org/
  if ($newpostsflag) {   if ($newpostsflag) {
     $discussion .= '&previous='.$prevread;      $discussion .= '&previous='.$prevread;
  }   }
                 if ($group ne '') {   $discussion .= &group_args($group);
                     $discussion .= '&'.$grp_arg;  
                 }  
  $discussion .='">'.&mt('Threaded View').'</a>&nbsp;&nbsp;'.   $discussion .='">'.&mt('Threaded View').'</a>&nbsp;&nbsp;'.
     '<a href="/adm/feedback?cmd=threadedoff&amp;symb='.$escsymb;      '<a href="/adm/feedback?cmd=threadedoff&amp;symb='.$escsymb;
  if ($newpostsflag) {   if ($newpostsflag) {
     $discussion .= '&previous='.$prevread;      $discussion .= '&previous='.$prevread;
  }   }
                 if ($group ne '') {   $discussion .= &group_args($group);
                     $discussion .= '&amp;'.$grp_arg;  
                 }  
  $discussion .='">'.&mt('Chronological View').'</a>&nbsp;&nbsp;   $discussion .='">'.&mt('Chronological View').'</a>&nbsp;&nbsp;
                               <a href= "/adm/feedback?cmd=sortfilter&amp;symb='.$escsymb;                                <a href= "/adm/feedback?cmd=sortfilter&amp;symb='.$escsymb;
                 if ($newpostsflag) {                  if ($newpostsflag) {
                     $discussion .= '&previous='.$prevread;                      $discussion .= '&previous='.$prevread;
                 }                  }
                 if ($group ne '') {   $discussion .= &group_args($group);
                     $discussion .= '&amp;'.$grp_arg;  
                 }  
                 $discussion .='">'.&mt('Sorting/Filtering options').'</a>&nbsp;&nbsp';                  $discussion .='">'.&mt('Sorting/Filtering options').'</a>&nbsp;&nbsp';
             } else {              } else {
                 $discussion .= '<td align="left">';                  $discussion .= '<td align="left">';
Line 448  imscp_v1p1.xsd http://www.imsglobal.org/ Line 435  imscp_v1p1.xsd http://www.imsglobal.org/
             if ($newpostsflag) {              if ($newpostsflag) {
                 $discussion .= '&previous='.$prevread;                  $discussion .= '&previous='.$prevread;
             }              }
             if ($group ne '') {      $discussion .= &group_args($group);
                 $discussion .= '&amp;'.$grp_arg;  
             }  
             $discussion .= '">'.&mt('Export').'?</a>&nbsp;&nbsp;</td>';              $discussion .= '">'.&mt('Export').'?</a>&nbsp;&nbsp;</td>';
     if ($newpostsflag) {      if ($newpostsflag) {
  if (!$markondisp) {   if (!$markondisp) {
     $discussion .='<td align="right"><a href="/adm/preferences?action=changediscussions';      $discussion .='<td align="right"><a href="/adm/preferences?action=changediscussions';
                     if ($group ne '') {      $discussion .= &group_args($group);
                         $discussion .= '&amp;'.$grp_arg;  
                     }  
     $discussion .= '">'.      $discussion .= '">'.
                         &mt('Preferences on what is marked as NEW').                          &mt('Preferences on what is marked as NEW').
  '</a><br /><a href="/adm/feedback?markread=1&amp;symb='.$escsymb;   '</a><br /><a href="/adm/feedback?markread=1&amp;symb='.$escsymb;
                     if ($group ne '') {      $discussion .= &group_args($group);
                         $discussion .= '&amp;'.$grp_arg;  
                     }  
                     $discussion .= '">'.&mt('Mark NEW posts no longer new').'</a>';                      $discussion .= '">'.&mt('Mark NEW posts no longer new').'</a>';
  } else {   } else {
     $discussion .= '<td>&nbsp;</td>';      $discussion .= '<td>&nbsp;</td>';
Line 481  imscp_v1p1.xsd http://www.imsglobal.org/ Line 462  imscp_v1p1.xsd http://www.imsglobal.org/
                 if ($newpostsflag) {                  if ($newpostsflag) {
                     $discussion .= '&previous='.$prevread;                      $discussion .= '&previous='.$prevread;
                 }                  }
                 if ($group ne '') {   $discussion .= &group_args($group);
                     $discussion .= '&amp;'.$grp_arg;  
                 }  
                 $discussion .= '">'.&mt('Show all posts').'</a> '.&mt('to display').' '.                  $discussion .= '">'.&mt('Show all posts').'</a> '.&mt('to display').' '.
                          $numhidden.' ';                           $numhidden.' ';
                 if ($showunmark) {                  if ($showunmark) {
Line 999  sub build_posting_display { Line 978  sub build_posting_display {
                                     if ($$newpostsflag) {                                      if ($$newpostsflag) {
                                         $sender .= '&previous='.$prevread;                                          $sender .= '&previous='.$prevread;
                                     }                                      }
                                     if ($group ne '') {      $sender .= &group_args($group);
                                         $sender.='&amp;'.&grp_args($group);  
                                     }  
                                     $sender .= '" '.$target.'>'.&mt('Edit').'</a>';                                      $sender .= '" '.$target.'>'.&mt('Edit').'</a>';
                                                                           
                                     unless ($seeid) {                                      unless ($seeid) {
Line 1026  sub build_posting_display { Line 1003  sub build_posting_display {
                                     if ($$newpostsflag) {                                      if ($$newpostsflag) {
                                         $sender .= '&previous='.$prevread;                                          $sender .= '&previous='.$prevread;
                                     }                                      }
                                     if ($group ne '') {      $sender .= &group_args($group);
                                         $sender.='&amp;'.&grp_args($group);  
                                     }  
                                     $sender .= '">'.&mt('Hide').'</a>';                                      $sender .= '">'.&mt('Hide').'</a>';
         }                               }                     
         $sender.=' <a href="/adm/feedback?deldisc='.          $sender.=' <a href="/adm/feedback?deldisc='.
Line 1036  sub build_posting_display { Line 1011  sub build_posting_display {
                                 if ($$newpostsflag) {                                  if ($$newpostsflag) {
                                     $sender .= '&previous='.$prevread;                                      $sender .= '&previous='.$prevread;
                                 }                                  }
                                 if ($group ne '') {   $sender .= &group_args($group);
                                     $sender .= '&amp;'.&grp_args($group);  
                                 }  
                                 $sender .= '">'.&mt('Delete').'</a>';                                  $sender .= '">'.&mt('Delete').'</a>';
                             }                              }
         } else {          } else {
Line 1074  sub build_posting_display { Line 1047  sub build_posting_display {
                                 if ($$newpostsflag) {                                  if ($$newpostsflag) {
                                     $sender .= '&previous='.$prevread;                                      $sender .= '&previous='.$prevread;
                                 }                                  }
                                 $sender .= '&amp;'.&grp_args($group);                                  $sender .= &group_args($group);
                                 $sender .= '" '.$target.'>'.&mt('Reply').'</a>';                                  $sender .= '" '.$target.'>'.&mt('Reply').'</a>';
                             } elsif (&Apache::lonnet::allowed('pch',                               } elsif (&Apache::lonnet::allowed('pch', 
  $env{'request.course.id'}.   $env{'request.course.id'}.
Line 1216  sub build_posting_display { Line 1189  sub build_posting_display {
                                 $$discussionitems[$idx] .= &mt('This post has been edited by the author.');                                  $$discussionitems[$idx] .= &mt('This post has been edited by the author.');
                                 if ($seeid) {                                  if ($seeid) {
                                     $$discussionitems[$idx] .= '&nbsp;&nbsp;<a href="/adm/feedback?allversions='.$escsymb.':::'.$idx;                                      $$discussionitems[$idx] .= '&nbsp;&nbsp;<a href="/adm/feedback?allversions='.$escsymb.':::'.$idx;
                                     if ($group ne '') {      $$discussionitems[$idx] .= &group_args($group);
                                         $$discussionitems[$idx] .= '&amp;'.&grp_args($group);  
                                     }  
                                     $$discussionitems[$idx] .= '">'.&mt('Display all versions').'</a>';                                      $$discussionitems[$idx] .= '">'.&mt('Display all versions').'</a>';
                                 }                                  }
                                 $$discussionitems[$idx].='<br/>'.&mt('Earlier version(s) were posted on: ');                                  $$discussionitems[$idx].='<br/>'.&mt('Earlier version(s) were posted on: ');
Line 3794  sub check_group_priv { Line 3765  sub check_group_priv {
     return '';      return '';
 }  }
   
 sub grp_args {   sub group_args { 
     my ($group) = @_;      my ($group) = @_;
     my $extra_args = 'group='.$group;      if ($group eq '') { return ''; }
       my $extra_args = '&amp;group='.$group;
     if (exists($env{'form.ref'})) {      if (exists($env{'form.ref'})) {
         $extra_args .= '&ref='.$env{'form.ref'};          $extra_args .= '&amp;ref='.$env{'form.ref'};
     }      }
     return $extra_args;      return $extra_args;
 }  }
Removed from v.1.210  
changed lines
  Added in v.1.211

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>