[LON-CAPA-cvs] cvs: loncom(GCI_3) /auth lonroles.pm
raeburn
raeburn@source.lon-capa.org
Wed, 08 Dec 2010 06:48:56 -0000
raeburn Wed Dec 8 06:48:56 2010 EDT
Modified files: (Branch: GCI_3)
/loncom/auth lonroles.pm
Log:
- Customization for GCI_3.
- Support multiple Concept Inventories
Index: loncom/auth/lonroles.pm
diff -u loncom/auth/lonroles.pm:1.240.2.22 loncom/auth/lonroles.pm:1.240.2.23
--- loncom/auth/lonroles.pm:1.240.2.22 Sun Dec 5 17:22:18 2010
+++ loncom/auth/lonroles.pm Wed Dec 8 06:48:56 2010
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# User Roles Screen
#
-# $Id: lonroles.pm,v 1.240.2.22 2010/12/05 17:22:18 raeburn Exp $
+# $Id: lonroles.pm,v 1.240.2.23 2010/12/08 06:48:56 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -801,8 +801,9 @@
if ($show_course) {
if ($env{'user.domain'} =~ /^\w+citest$/) {
$r->print('<h2>'.&mt('Currently no active Concept Tests').'</h2>');
- } elsif ($env{'user.domain'} =~ /ci$/) {
- $r->print('<h2>'.&mt('Currently not assigned as a GCI contributor').'</h2>');
+ } elsif ($env{'user.domain'} =~ /^\w+ci$/) {
+ my $inventory = uc($env{'user.domain'});
+ $r->print('<h2>'.&mt('Currently not assigned as a [_1] contributor',$inventory).'</h2>');
}
} else {
$r->print('<h2>'.&mt('Currently no active roles, courses or communities').'</h2>');
@@ -979,7 +980,7 @@
);
my $inventory = uc($env{'user.domain'});
my %features = (
- review => 'Review and comment on existing $inventory questions',
+ review => "Review and comment on existing $inventory questions",
submit => "Submit $inventory questions of your own",
managetest => 'Create an online test for your students',
tutorial => 'View tutorials on creating online tests',