loncom/interface/lonsyllabus.pm - diff

Return to lonsyllabus.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.118, 2013/05/03 21:57:13	version 1.119, 2013/05/05 02:21:20
Line 522 ENDSCRIPT	Line 522 ENDSCRIPT
if ($target ne 'tex') {	if ($target ne 'tex') {
my $protocol = $Apache::lonnet::protocol{$homeserver};	my $protocol = $Apache::lonnet::protocol{$homeserver};
$protocol = 'http' if ($protocol ne 'https');	$protocol = 'http' if ($protocol ne 'https');
$r->print('<div class="LC_info">'	my $link = $protocol.'://'.&Apache::lonnet::hostname($homeserver).$r->uri;
.'<p>'	$r->print('<div class="LC_left_float">'
.&mt('This syllabus can be publicly viewed at [_1]'	.'<span class="LC_help_open_topic LC_info">'
,'<tt>'.$protocol.'://'.&Apache::lonnet::hostname($homeserver).$r->uri.'</tt>')	.'<span class="LC_info">'
.' '.&Apache::loncommon::help_open_topic('Syllabus_ExtLink')	.&mt('Public link (no log-in): [_1]','<tt>'.$link.'</tt>')
.'</p>'	.' </span>'.&Apache::loncommon::help_open_topic('Syllabus_ExtLink')
.'</div>');	.'</span>'
	.'</div><div style="padding:0;clear:both;margin:0;border:0"></div>');
my $lonhost = $r->dir_config('lonHostID');	my $lonhost = $r->dir_config('lonHostID');
$r->print(&chooser($external,$uploaded,$cdom,$cnum,$lonhost,\%syllabusfields,\%syllabus));	$r->print(&chooser($external,$uploaded,$cdom,$cnum,$lonhost,\%syllabusfields,\%syllabus));
}	}