';
}
@@ -1472,7 +1472,7 @@ sub replicate_attachments {
}
sub mail_screen {
- my ($r,$feedurl,$options,$caller_symb) = @_;
+ my ($r,$feedurl,$options,$caller_symb,$attachmaxtext) = @_;
if (exists($env{'form.origpage'})) {
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['subject','comment','currnewattach','addnewattach','deloldattach','delnewattach','timestamp','idx','anondiscuss','discuss','blog','group','ref']);
}
@@ -1482,7 +1482,7 @@ sub mail_screen {
'myqu' => 'My question/comment/feedback:',
'title' => 'Title',
'reta' => 'Retained attachments',
- 'atta' => 'Attachment (128 KB max size)',
+ 'atta' => 'Attachment',
);
my $restitle = &get_resource_title($caller_symb,$feedurl);
my $quote='';
@@ -1618,7 +1618,7 @@ END
$comment = &unescape($env{'form.comment'});
&process_attachments(\@currnewattach,\@currdelold,\@keepold);
}
- my $latexHelp=&Apache::loncommon::helpLatexCheatsheet();
+ my $latexHelp=&Apache::loncommon::helpLatexCheatsheet(undef,undef,1);
my $send=&mt('Send');
my $alert = &mt('Please select a feedback type.');
my $js= <$lt{'myqu'}
$latexHelp
+
+
$lt{'title'}:
END
}
@@ -1795,7 +1797,7 @@ sub print_display_options {
'actn' => 'Action',
'deff' => 'Default for all discussions',
'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',
'wipa' => 'Whether individual posts can be marked as read/unread',
'allposts' => 'All posts',
@@ -1960,7 +1962,7 @@ END
$lt{$disctogg}
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());
$r->print(<
-
-
-
+
+
+
END
@@ -2152,7 +2154,7 @@ $start_page
-
-
+
$section_sel
-
+
$group_sel
@@ -2391,7 +2393,7 @@ ENDFAILREDIR
}
sub redirect_back {
- my ($r,$feedurl,$typestyle,$sendsomething,$sendposts,$blog,$status,$previous,$sort,$rolefilter,$statusfilter,$sectionpick,$grouppick,$numpicks,$group) = @_;
+ my ($r,$feedurl,$typestyle,$sendsomething,$sendposts,$blog,$status,$previous,$sort,$rolefilter,$statusfilter,$sectionpick,$grouppick,$numpicks,$group,$toolarge) = @_;
my $sorttag = '';
my $roletag = '';
my $statustag = '';
@@ -2475,7 +2477,8 @@ sub redirect_back {
}
my $grouptag;
if ($group ne '') {
- $grouptag = ''; my $refarg;
+ $grouptag = '';
+ my $refarg;
if (exists($env{'form.ref'})) {
$refarg = '&ref='.$env{'form.ref'};
$grouptag .= '';
@@ -2505,6 +2508,7 @@ $start_page
$typestyle
Sent $sendsomething message(s), and $sendposts post(s).
$blog
+$toolarge
$status