version 1.262, 2009/01/20 16:38:39
|
version 1.268, 2009/03/04 17:11:22
|
Line 765 sub send_message_link {
|
Line 765 sub send_message_link {
|
my $output = '<span class="LC_message_link">'. |
my $output = '<span class="LC_message_link">'. |
' <a href="/adm/feedback?sendmessageonly=1&symb='. |
' <a href="/adm/feedback?sendmessageonly=1&symb='. |
&escape($ressymb).'"><img alt="" src="'. |
&escape($ressymb).'"><img alt="" src="'. |
&Apache::loncommon::lonhttpdurl('/adm/lonMisc/feedback.gif'). |
&Apache::loncommon::lonhttpdurl('/res/adm/pages/com.png'). |
'" border="0" />'.&mt('Send Message').'</a></span>'; |
'" border="0" />'.&mt('Send Message').'</a></span>'; |
return $output; |
return $output; |
} |
} |
Line 1695 $quote
|
Line 1695 $quote
|
<p>$lt{'myqu'}</p> |
<p>$lt{'myqu'}</p> |
<p> |
<p> |
$latexHelp |
$latexHelp |
|
</p> |
|
<p> |
$lt{'title'}: <input type="text" name="subject" size="30" value="$subject" /></p> |
$lt{'title'}: <input type="text" name="subject" size="30" value="$subject" /></p> |
<p> |
<p> |
<textarea name="comment" id="comment" cols="60" rows="10" wrap="hard">$comment |
<textarea name="comment" id="comment" cols="60" rows="10" wrap="hard">$comment |
Line 1795 sub print_display_options {
|
Line 1797 sub print_display_options {
|
'actn' => 'Action', |
'actn' => 'Action', |
'deff' => 'Default for all discussions', |
'deff' => 'Default for all discussions', |
'prca' => 'Preferences can be set for this discussion that determine ....', |
'prca' => 'Preferences can be set for this discussion that determine ....', |
'whpo' => 'Which posts are displayed when you display this bulletin board or resource, and', |
'whpo' => 'Which posts are displayed when you display this discussion board or resource, and', |
'unwh' => 'Under what circumstances posts are identified as "NEW", and', |
'unwh' => 'Under what circumstances posts are identified as "NEW", and', |
'wipa' => 'Whether individual posts can be marked as read/unread', |
'wipa' => 'Whether individual posts can be marked as read/unread', |
'allposts' => 'All posts', |
'allposts' => 'All posts', |
Line 1960 END
|
Line 1962 END
|
<td>$lt{$disctogg}</td> |
<td>$lt{$disctogg}</td> |
<td><label><input type="checkbox" name="disctogg" onClick="discdispChk('2')" />$lt{'chgt'} "$toggchange"</label></td> |
<td><label><input type="checkbox" name="disctogg" onClick="discdispChk('2')" />$lt{'chgt'} "$toggchange"</label></td> |
END |
END |
my $save = &mt('Save Changes'); |
my $save = &mt('Save'); |
$r->print(&Apache::loncommon::end_data_table_row()); |
$r->print(&Apache::loncommon::end_data_table_row()); |
$r->print(&Apache::loncommon::end_data_table()); |
$r->print(&Apache::loncommon::end_data_table()); |
$r->print(<<END); |
$r->print(<<END); |
Line 2605 sub screen_header {
|
Line 2607 sub screen_header {
|
} |
} |
} |
} |
} |
} |
if ($msgoptions) { $msgoptions='<h2><img src="'.&Apache::loncommon::lonhttpdurl('/adm/lonMisc/feedback.gif').'" />'.&mt('Sending Messages').'</h2>'.$msgoptions; } |
if ($msgoptions) { $msgoptions='<h2><img src="'.&Apache::loncommon::lonhttpdurl('/res/adm/pages/com.png').'" />'.&mt('Sending Messages').'</h2>'.$msgoptions; } |
if ($discussoptions) { |
if ($discussoptions) { |
$discussoptions='<h2><img src="'.&Apache::loncommon::lonhttpdurl('/adm/lonMisc/chat.gif').'" />'.&mt('Discussion Contributions').'</h2>'.$discussoptions; } |
$discussoptions='<h2><img src="'.&Apache::loncommon::lonhttpdurl('/adm/lonMisc/chat.gif').'" />'.&mt('Discussion Contributions').'</h2>'.$discussoptions; } |
return $msgoptions.$discussoptions; |
return $msgoptions.$discussoptions; |
Line 2889 sub show_preview {
|
Line 2891 sub show_preview {
|
|
|
my $end_page = &Apache::loncommon::end_page(); |
my $end_page = &Apache::loncommon::end_page(); |
|
|
$r->print($start_page.'<table border="2"><tr><td>'. |
$r->print($start_page |
'<b>'.&mt('Subject').':</b> '.$subject.'<br /><br />'. |
.'<h1>'.&mt('Preview').'</h1>' |
$message.'</td></tr></table>'.$end_page); |
.&Apache::lonhtmlcommon::start_pick_box() |
|
.&Apache::lonhtmlcommon::row_title(&mt('Subject')) |
|
.$subject |
|
.&Apache::lonhtmlcommon::row_closure() |
|
.&Apache::lonhtmlcommon::row_title(&mt('Message')) |
|
.$message |
|
.&Apache::lonhtmlcommon::row_closure(1) |
|
.&Apache::lonhtmlcommon::end_pick_box() |
|
.$end_page |
|
); |
} |
} |
|
|
|
|
Line 3305 sub handler {
|
Line 3316 sub handler {
|
['hide','unhide','deldisc','postdata','preview','replydisc','editdisc','cmd','symb','onlyunread','allposts','onlyunmark','previous','markread','markonread','markondisp','toggoff','toggon','modifydisp','changes','navtime','navmaps','navurl','sortposts','applysort','rolefilter','statusfilter','sectionpick','groupick','posterlist','userpick','attach','origpage','currnewattach','deloldattach','keepold','allversions','export','sendmessageonly','group','ref']); |
['hide','unhide','deldisc','postdata','preview','replydisc','editdisc','cmd','symb','onlyunread','allposts','onlyunmark','previous','markread','markonread','markondisp','toggoff','toggon','modifydisp','changes','navtime','navmaps','navurl','sortposts','applysort','rolefilter','statusfilter','sectionpick','groupick','posterlist','userpick','attach','origpage','currnewattach','deloldattach','keepold','allversions','export','sendmessageonly','group','ref']); |
my $group = $env{'form.group'}; |
my $group = $env{'form.group'}; |
my %attachmax = ( |
my %attachmax = ( |
text => '(128 KB max size)', |
text => &mt('(128 KB max size)'), |
num => 131072, |
num => 131072, |
); |
); |
if ($env{'form.editdisc'}) { |
if ($env{'form.editdisc'}) { |
Line 3435 sub handler {
|
Line 3446 sub handler {
|
my %lt = &Apache::lonlocal::texthash( |
my %lt = &Apache::lonlocal::texthash( |
'mnpa' => 'Marked "New" posts as read in a total of', |
'mnpa' => 'Marked "New" posts as read in a total of', |
'robb' => 'resources/bulletin boards.', |
'robb' => 'resources/bulletin boards.', |
'twnp' => 'There are currently no resources or bulletin boards with unread discussion postings.' |
'twnp' => 'There are currently no resources or discussion boards with unread discussion postings.' |
); |
); |
foreach my $res (@resources) { |
foreach my $res (@resources) { |
my $ressymb=$res; |
my $ressymb=$res; |
Line 3581 ENDREDIR
|
Line 3592 ENDREDIR
|
&Apache::lonnet::appenv({'environment.threadeddiscussion' => 'on'}); |
&Apache::lonnet::appenv({'environment.threadeddiscussion' => 'on'}); |
} else { |
} else { |
&Apache::lonnet::del('environment',['threadeddiscussion']); |
&Apache::lonnet::del('environment',['threadeddiscussion']); |
&Apache::lonnet::delenv('environment\.threadeddiscussion'); |
&Apache::lonnet::delenv('environment.threadeddiscussion'); |
} |
} |
&redirect_back($r,$feedurl,&mt('Changed discussion view mode').'<br />', |
&redirect_back($r,$feedurl,&mt('Changed discussion view mode').'<br />', |
'0','0','','',$env{'form.previous'},undef,undef,undef, |
'0','0','','',$env{'form.previous'},undef,undef,undef, |