loncom/interface/lonsimplepage.pm - diff

Return to lonsimplepage.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.9, 2003/03/10 14:20:07	version 1.11, 2003/07/10 10:53:18
Line 99 ENDDOCUMENT	Line 99 ENDDOCUMENT

if ($allowed) {	if ($allowed) {
$r->print('<p>'.	$r->print('<p>'.
&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes','Help with filling in text boxes').'<br /><a href="'.$r->uri.'?forcestudent=1">Show Public View</a>'.	&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes','Help with filling in text boxes').'<br /><a href="'.$r->uri.'?forcestudent=1"><font size="+1">Show Student View</font></a>'.
&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView').'</p>');	&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView').'</p>');
}	}
if (($ENV{'form.uploaddoc.filename'}) &&	if (($ENV{'form.uploaddoc.filename'}) &&
Line 142 ENDDOCUMENT	Line 142 ENDDOCUMENT
my $message=$syllabus{$_};	my $message=$syllabus{$_};
$message=~s/\n/\<br \/\>/g;	$message=~s/\n/\<br \/\>/g;
$message	$message
=~s/(http\:\/\/[^\s]+)/\<a href=\"$1\"\>\<tt\>$1\<\/tt\>\<\/a\>/g;	=~s/(https*\:\/\/[^\s]+)/\<a href=\"$1\"\>\<tt\>$1\<\/tt\>\<\/a\>/g;
$message=&Apache::lontexconvert::msgtexconverted($message);	$message=&Apache::lontexconvert::msgtexconverted($message);
unless ($_ eq 'aaa_title') {	unless ($_ eq 'aaa_title') {
if (($_ ne 'bbb_content') \|\| ($allowed)) {	if (($_ ne 'bbb_content') \|\| ($allowed)) {