[LON-CAPA-cvs] cvs: loncom /interface lonsyllabus.pm
raeburn
raeburn at source.lon-capa.org
Sat May 4 22:21:20 EDT 2013
raeburn Sun May 5 02:21:20 2013 EDT
Modified files:
/loncom/interface lonsyllabus.pm
Log:
- Publicly shareable link shown on Syllabus editing page more prominent.
Index: loncom/interface/lonsyllabus.pm
diff -u loncom/interface/lonsyllabus.pm:1.118 loncom/interface/lonsyllabus.pm:1.119
--- loncom/interface/lonsyllabus.pm:1.118 Fri May 3 21:57:13 2013
+++ loncom/interface/lonsyllabus.pm Sun May 5 02:21:20 2013
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Syllabus
#
-# $Id: lonsyllabus.pm,v 1.118 2013/05/03 21:57:13 raeburn Exp $
+# $Id: lonsyllabus.pm,v 1.119 2013/05/05 02:21:20 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -522,13 +522,14 @@
if ($target ne 'tex') {
my $protocol = $Apache::lonnet::protocol{$homeserver};
$protocol = 'http' if ($protocol ne 'https');
- $r->print('<div class="LC_info">'
- .'<p>'
- .&mt('This syllabus can be publicly viewed at [_1]'
- ,'<tt>'.$protocol.'://'.&Apache::lonnet::hostname($homeserver).$r->uri.'</tt>')
- .' '.&Apache::loncommon::help_open_topic('Syllabus_ExtLink')
- .'</p>'
- .'</div>');
+ my $link = $protocol.'://'.&Apache::lonnet::hostname($homeserver).$r->uri;
+ $r->print('<div class="LC_left_float">'
+ .'<span class="LC_help_open_topic LC_info">'
+ .'<span class="LC_info">'
+ .&mt('Public link (no log-in): [_1]','<tt>'.$link.'</tt>')
+ .' </span>'.&Apache::loncommon::help_open_topic('Syllabus_ExtLink')
+ .'</span>'
+ .'</div><div style="padding:0;clear:both;margin:0;border:0"></div>');
my $lonhost = $r->dir_config('lonHostID');
$r->print(&chooser($external,$uploaded,$cdom,$cnum,$lonhost,\%syllabusfields,\%syllabus));
}
More information about the LON-CAPA-cvs
mailing list