[LON-CAPA-cvs] cvs: loncom(version_0_6) /auth lonroles.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Wed, 19 Mar 2003 21:54:32 -0000
albertel Wed Mar 19 16:54:32 2003 EDT
Modified files: (Branch: version_0_6)
/loncom/auth lonroles.pm
Log:
- backporting change to roles screen that make a seperate syllabus link rather than making the course title the link to the syllabus
Index: loncom/auth/lonroles.pm
diff -u loncom/auth/lonroles.pm:1.46 loncom/auth/lonroles.pm:1.46.2.1
--- loncom/auth/lonroles.pm:1.46 Mon Nov 25 11:05:56 2002
+++ loncom/auth/lonroles.pm Wed Mar 19 16:54:32 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# User Roles Screen
#
-# $Id: lonroles.pm,v 1.46 2002/11/25 16:05:56 matthew Exp $
+# $Id: lonroles.pm,v 1.46.2.1 2003/03/19 21:54:32 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -326,15 +326,20 @@
}
my $tcourseid=$tdom.'_'.$trest;
if ($ENV{'course.'.$tcourseid.'.description'}) {
- $twhere=
-&Apache::loncommon::syllabuswrapper($ENV{'course.'.$tcourseid.'.description'},
-$trest,$tdom);
+ $twhere=$ENV{'course.'.$tcourseid.'.description'};
+ unless ($twhere eq 'Currently not available') {
+ $twhere.=' <font size="-2">'.
+ &Apache::loncommon::syllabuswrapper('Syllabus',$trest,$tdom,$tfont).
+ '</font>';
+ }
} else {
my %newhash=Apache::lonnet::coursedescription
($tcourseid);
if (%newhash) {
- $twhere=
-&Apache::loncommon::syllabuswrapper($newhash{'description'},$trest,$tdom);
+ $twhere=$newhash{'description'}.
+ ' <font size="-2">'.
+ &Apache::loncommon::syllabuswrapper('Syllabus',$trest,$tdom,$tfont).
+ '</font>';
} else {
$twhere='Currently not available';
$ENV{'course.'.$tcourseid.'.description'}=$twhere;