version 1.278, 2009/11/04 17:45:49
|
version 1.281, 2009/12/07 15:46:16
|
Line 569 imscp_v1p1.xsd http://www.imsglobal.org/
|
Line 569 imscp_v1p1.xsd http://www.imsglobal.org/
|
<table border="0" cellpadding="0" cellspacing="4"> |
<table border="0" cellpadding="0" cellspacing="4"> |
<tr> |
<tr> |
<td> |
<td> |
<font size="-1"><b>$lt{'cuse'}</b>:</td> |
<font size="-1"><b>$lt{'cuse'}</b>:</font></td> |
<td> </td> |
<td> </td> |
<td><font size="-1"> |
<td><font size="-1"> |
END |
END |
Line 591 END
|
Line 591 END
|
</font></td> |
</font></td> |
<td> </td> |
<td> </td> |
<td align="left"> |
<td align="left"> |
<font size="-1"><b><a href="$chglink">$lt{'chgt'}</a>?</font></b> |
<font size="-1"><b><a href="$chglink">$lt{'chgt'}</a>?</b></font> |
</td> |
</td> |
</tr> |
</tr> |
</table> |
</table> |
Line 815 sub action_links_bar {
|
Line 815 sub action_links_bar {
|
&mt('Preferences on what is marked as NEW'). |
&mt('Preferences on what is marked as NEW'). |
'</a><br /><a href="/adm/feedback?markread=1&symb='.$escsymb; |
'</a><br /><a href="/adm/feedback?markread=1&symb='.$escsymb; |
$discussion .= &group_args($group); |
$discussion .= &group_args($group); |
$discussion .= '">'.&mt('Mark NEW posts no longer new').'</a>'; |
$discussion .= '">'.&mt('Mark NEW posts no longer new').'</a></td>'; |
} else { |
} else { |
$discussion .= '<td> </td>'; |
$discussion .= '<td> </td>'; |
} |
} |
Line 1255 sub build_posting_display {
|
Line 1255 sub build_posting_display {
|
} |
} |
$$discussionitems[$idx] .= '<td align="left"> '. |
$$discussionitems[$idx] .= '<td align="left"> '. |
'<b>'.$subject.'</b> '. |
'<b>'.$subject.'</b> '. |
$sender.'</b> '.$vgrlink.' ('. |
'<b>'.$sender.'</b> '.$vgrlink.' ('. |
&Apache::lonlocal::locallocaltime($posttime).')</td>'; |
&Apache::lonlocal::locallocaltime($posttime).')</td>'; |
if ($$dischash{$toggkey}) { |
if ($$dischash{$toggkey}) { |
$$discussionitems[$idx].='<td align="right"> '. |
$$discussionitems[$idx].='<td align="right"> '. |
Line 1484 sub mail_screen {
|
Line 1484 sub mail_screen {
|
} |
} |
|
|
my %lt = &Apache::lonlocal::texthash( |
my %lt = &Apache::lonlocal::texthash( |
'plch' => 'Please check at least one of the following feedback types:', |
|
'myqu' => 'My question/comment/feedback:', |
'myqu' => 'My question/comment/feedback:', |
'title' => 'Title', |
'title' => 'Title', |
'reta' => 'Retained attachments', |
'reta' => 'Retained attachments', |
Line 1700 END
|
Line 1699 END
|
END |
END |
} |
} |
$r->print(<<END); |
$r->print(<<END); |
$lt{'plch'} |
|
$options<hr /> |
$options<hr /> |
$quote |
$quote |
<p>$lt{'myqu'}</p> |
<p>$lt{'myqu'}</p> |
Line 2138 $start_page
|
Line 2136 $start_page
|
<br /><br /> |
<br /><br /> |
<table border="0"> |
<table border="0"> |
<tr> |
<tr> |
<td><b>$lt{'soor'}</b></td> |
<th>$lt{'soor'}</th> |
<td> </td> |
<th> </th> |
<td><b>$lt{'sprs'}</b></td> |
<th>$lt{'sprs'}</th> |
<td> </td> |
<th> </th> |
<td><b>$lt{'spur'}</b></td> |
<th>$lt{'spur'}</th> |
<td> </td> |
<th> </th> |
<td><b>$lt{'spse'}</b></td> |
<th>$lt{'spse'}</th> |
<td> </td> |
<th> </th> |
<td><b>$lt{'spgr'}</b></td> |
<th>$lt{'spgr'}</th> |
<td> </td> |
<th> </th> |
<td><b>$lt{'psub'}</b></td> |
<th>$lt{'psub'}</th> |
</tr> |
</tr> |
<tr> |
<tr> |
<td align="center" valign="top"> |
<td align="center" valign="top"> |
Line 2645 sub screen_header {
|
Line 2643 sub screen_header {
|
} |
} |
if ($msgoptions) { |
if ($msgoptions) { |
$msgoptions='<h2><img src="'.&Apache::loncommon::lonhttpdurl('/res/adm/pages/com.png').'" />' |
$msgoptions='<h2><img src="'.&Apache::loncommon::lonhttpdurl('/res/adm/pages/com.png').'" />' |
.' '.&mt('Send Feedback').'</h2>' |
.' '.&mt('Send Feedback').'</h2><p>'.&Apache::lonhtmlcommon::coursepreflink(&mt('Feedback Settings'),'feedback').'</p>' |
.$msgoptions; |
.$msgoptions; |
} |
} |
if ($discussoptions) { |
if ($discussoptions) { |
$discussoptions='<h2><img src="'.&Apache::loncommon::lonhttpdurl('/adm/lonMisc/chat.gif').'" />' |
$discussoptions='<h2><img src="'.&Apache::loncommon::lonhttpdurl('/adm/lonMisc/chat.gif').'" />' |
.' '.&mt('Discussion Contributions').'</h2>' |
.' '.&mt('Discussion Contributions').'</h2><p>'.&Apache::lonhtmlcommon::coursepreflink(&mt('Discussion Settings'),'discussion').'</p>' |
.$discussoptions; |
.$discussoptions; |
} |
} |
return $msgoptions.$discussoptions; |
return $msgoptions.$discussoptions; |
Line 2951 sub show_preview {
|
Line 2949 sub show_preview {
|
); |
); |
} |
} |
|
|
|
sub contains_block_html { |
|
my ($message)=@_; |
|
return ($message =~ m/ |
|
<(br|h1|h2|h3|h4|h5|h6|p|ol|ul|table|pre|address|blockquote|center|div) |
|
[\s]* |
|
([\w]+\=['"][\w]+['"])* |
|
[\s]* |
|
( |
|
[\s]*[\/]>| |
|
>.*<\/\1[\s]*> |
|
)/x ); |
|
} |
|
|
sub newline_to_br { |
sub newline_to_br { |
my ($message)=@_; |
my ($message)=@_; |
my $newmessage; |
my $newmessage; |
Line 3043 $toolarge
|
Line 3053 $toolarge
|
<table class="LC_data_table"> |
<table class="LC_data_table"> |
<tr> |
<tr> |
<td colspan="2"> |
<td colspan="2"> |
<b>Subject:</b> $subject</b><br /><br /> |
<b>Subject:</b> <b>$subject</b><br /><br /> |
END |
END |
if ($idx) { |
if ($idx) { |
if ($attachmenturls) { |
if ($attachmenturls) { |