[LON-CAPA-cvs] cvs: loncom /auth roles.tab rolesplain.tab /homework lonsimpleproblemedit.pm /interface lonbulletin.pm londocs.pm lonsimplepage.pm lonsyllabus.pm mydesk.tab
www
lon-capa-cvs@mail.lon-capa.org
Tue, 09 Sep 2003 19:39:05 -0000
www Tue Sep 9 15:39:05 2003 EDT
Modified files:
/loncom/auth roles.tab rolesplain.tab
/loncom/homework lonsimpleproblemedit.pm
/loncom/interface lonbulletin.pm londocs.pm lonsimplepage.pm
lonsyllabus.pm mydesk.tab
Log:
Bug #2148: new "mdc" privilege to edit/modify DOCS
Index: loncom/auth/roles.tab
diff -u loncom/auth/roles.tab:1.22 loncom/auth/roles.tab:1.23
--- loncom/auth/roles.tab:1.22 Tue Aug 12 15:46:04 2003
+++ loncom/auth/roles.tab Tue Sep 9 15:39:04 2003
@@ -2,7 +2,7 @@
dc:s bre:sma
dc:d cli&UIK:cau&U:cdg&UIK:mau:ccc&U:cin&UIK:cta&UIK:cep&UIK:ccr&UIK:cst&UIK:cad&UIK:dro:mky:psa
cc:s bre:sma:mcr
-cc:c cin&IK:cta&IK:cep&IK:ccr&IK:cst&IK:are:cre:ere:vgr:gan:srm:opa:mgr:rin:pch:plc
+cc:c cin&IK:cta&IK:cep&IK:ccr&IK:cst&IK:are:cre:ere:vgr:gan:srm:opa:mgr:rin:pch:plc:mdc
in:s sma
in:d bre
in:c vgr:mgr:gan:dcm:srm:pch&C:plc&C:dch:pac:rin:las:opa
Index: loncom/auth/rolesplain.tab
diff -u loncom/auth/rolesplain.tab:1.9 loncom/auth/rolesplain.tab:1.10
--- loncom/auth/rolesplain.tab:1.9 Tue Aug 12 15:46:04 2003
+++ loncom/auth/rolesplain.tab Tue Sep 9 15:39:04 2003
@@ -52,6 +52,7 @@
dcm:Disable all communication among students
sma:Send internal email
srm:Send broadcast and receipt-required email
+mdc:Edit/Modify DOCS
pch:Post discussion on course resources
plc:Post to live chatrooms
dch:Delete messages from bulletin boards
Index: loncom/homework/lonsimpleproblemedit.pm
diff -u loncom/homework/lonsimpleproblemedit.pm:1.4 loncom/homework/lonsimpleproblemedit.pm:1.5
--- loncom/homework/lonsimpleproblemedit.pm:1.4 Wed Jul 16 11:19:56 2003
+++ loncom/homework/lonsimpleproblemedit.pm Tue Sep 9 15:39:04 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Simple Problem Parameter Setting "Editor"
#
-# $Id: lonsimpleproblemedit.pm,v 1.4 2003/07/16 15:19:56 www Exp $
+# $Id: lonsimpleproblemedit.pm,v 1.5 2003/09/09 19:39:04 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -138,7 +138,7 @@
}
# -------------------------------------------------------------------- Allowed?
- unless (&Apache::lonnet::allowed('srm',$ENV{'request.course.id'})) {
+ unless (&Apache::lonnet::allowed('mdc',$ENV{'request.course.id'})) {
return HTTP_NOT_ACCEPTABLE;
}
# ----------------------------------------------------------------- Send header
Index: loncom/interface/lonbulletin.pm
diff -u loncom/interface/lonbulletin.pm:1.11 loncom/interface/lonbulletin.pm:1.12
--- loncom/interface/lonbulletin.pm:1.11 Thu Jul 10 06:53:18 2003
+++ loncom/interface/lonbulletin.pm Tue Sep 9 15:39:04 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Bulletin Board Handler
#
-# $Id: lonbulletin.pm,v 1.11 2003/07/10 10:53:18 www Exp $
+# $Id: lonbulletin.pm,v 1.12 2003/09/09 19:39:04 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -93,7 +93,7 @@
("Bulletin Board/Discussion",$forcestudent,$addentries,'',$dom,
$ENV{'form.register'}));
- my $allowed=&Apache::lonnet::allowed('srm',$ENV{'request.course.id'});
+ my $allowed=&Apache::lonnet::allowed('mdc',$ENV{'request.course.id'});
if ($forcestudent) { $allowed=0; }
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.76 loncom/interface/londocs.pm:1.77
--- loncom/interface/londocs.pm:1.76 Mon Sep 8 17:19:44 2003
+++ loncom/interface/londocs.pm Tue Sep 9 15:39:04 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.76 2003/09/08 21:19:44 www Exp $
+# $Id: londocs.pm,v 1.77 2003/09/09 19:39:04 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -658,7 +658,7 @@
$forcesupplement=($ENV{'form.folder'}=~/^supplemental_/);
# does this user have privileges to post, etc?
- $allowed=&Apache::lonnet::allowed('srm',$ENV{'request.course.id'});
+ $allowed=&Apache::lonnet::allowed('mdc',$ENV{'request.course.id'});
if ($allowed) {
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['cmd']);
$script=&Apache::lonratedt::editscript('simple');
Index: loncom/interface/lonsimplepage.pm
diff -u loncom/interface/lonsimplepage.pm:1.11 loncom/interface/lonsimplepage.pm:1.12
--- loncom/interface/lonsimplepage.pm:1.11 Thu Jul 10 06:53:18 2003
+++ loncom/interface/lonsimplepage.pm Tue Sep 9 15:39:04 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Simple Page Editor
#
-# $Id: lonsimplepage.pm,v 1.11 2003/07/10 10:53:18 www Exp $
+# $Id: lonsimplepage.pm,v 1.12 2003/09/09 19:39:04 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -93,7 +93,7 @@
$r->print('</head>'.&Apache::loncommon::bodytag
("Course Page",$forcestudent,$addentries,'',$dom,$ENV{'form.register'}));
- my $allowed=&Apache::lonnet::allowed('srm',$ENV{'request.course.id'});
+ my $allowed=&Apache::lonnet::allowed('mdc',$ENV{'request.course.id'});
if ($forcestudent) { $allowed=0; }
Index: loncom/interface/lonsyllabus.pm
diff -u loncom/interface/lonsyllabus.pm:1.21 loncom/interface/lonsyllabus.pm:1.22
--- loncom/interface/lonsyllabus.pm:1.21 Thu Jul 10 06:53:18 2003
+++ loncom/interface/lonsyllabus.pm Tue Sep 9 15:39:04 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Syllabus
#
-# $Id: lonsyllabus.pm,v 1.21 2003/07/10 10:53:18 www Exp $
+# $Id: lonsyllabus.pm,v 1.22 2003/09/09 19:39:04 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -119,7 +119,7 @@
if ($ENV{'user.environment'}) {
# does this user have privileges to post, etc?
if ($ENV{'request.course.id'}) {
- $allowed=&Apache::lonnet::allowed('srm',$ENV{'request.course.id'});
+ $allowed=&Apache::lonnet::allowed('mdc',$ENV{'request.course.id'});
if ($forcestudent) { $allowed=0; }
}
if ($allowed) {
Index: loncom/interface/mydesk.tab
diff -u loncom/interface/mydesk.tab:1.45 loncom/interface/mydesk.tab:1.46
--- loncom/interface/mydesk.tab:1.45 Wed Aug 6 13:23:49 2003
+++ loncom/interface/mydesk.tab Tue Sep 9 15:39:04 2003
@@ -18,7 +18,7 @@
1:1:adv:rcm:roles.gif:choose:role:go('/adm/roles');:Choose the user role
1:2:clear
1:2:course:any:docs.gif:course:docs:go('/adm/coursedocs');:View documents included in this course
-1:2:psrm:$crs:docs.gif:edit crs:docs:go('/adm/coursedocs');:Edit and view documents included in this course
+1:2:pmdc:$crs:docs.gif:edit crs:docs:go('/adm/coursedocs');:Edit and view documents included in this course
2:1:clear
2:2:clear
2:2:course:any:nav.gif:navigate:contents:gopost('/adm/navmaps',currentURL);:Navigate the table of contents for this course