version 1.36, 2004/06/11 16:28:14
|
version 1.38, 2004/07/27 23:35:34
|
Line 37 use Apache::lonfeedback;
|
Line 37 use Apache::lonfeedback;
|
use Apache::lonannounce; |
use Apache::lonannounce; |
use Apache::lonlocal; |
use Apache::lonlocal; |
use Apache::lonhtmlcommon; |
use Apache::lonhtmlcommon; |
|
use Apache::lonspeller(); |
|
|
sub handler { |
sub handler { |
my $r = shift; |
my $r = shift; |
Line 122 ENDDOCUMENT
|
Line 123 ENDDOCUMENT
|
if ($target ne 'tex') { |
if ($target ne 'tex') { |
$r->print('<table border="2">'); |
$r->print('<table border="2">'); |
} else { |
} else { |
$r->print('\begin{tabular}{|c|c|}\hline'); |
$r->print('\begin{tabular}{|p{0.45\textwidth}|p{0.45\textwidth}|}\hline'); |
} |
} |
foreach my $element (sort keys %coursepersonnel) { |
foreach my $element (sort keys %coursepersonnel) { |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
Line 286 ENDDOCUMENT
|
Line 287 ENDDOCUMENT
|
$message=~s/\n/\<br \/\>/g; |
$message=~s/\n/\<br \/\>/g; |
$message |
$message |
=~s/(https*\:\/\/[^\s]+)/\<a href=\"$1\"\>\<tt\>$1\<\/tt\>\<\/a\>/g; |
=~s/(https*\:\/\/[^\s]+)/\<a href=\"$1\"\>\<tt\>$1\<\/tt\>\<\/a\>/g; |
|
if ($allowed) { |
|
$message=&Apache::lonspeller::markeduptext($message); |
|
} |
$message=&Apache::lontexconvert::msgtexconverted($message); |
$message=&Apache::lontexconvert::msgtexconverted($message); |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
$r->print('<h3>'.$syllabusfields{$_}.'</h3><blockquote>'. |
$r->print('<h3>'.$syllabusfields{$_}.'</h3><blockquote>'. |