From 会计师事务所"<会计师事务所@21cn.com Mon Jul 14 11:27:22 2003 From: 会计师事务所"<会计师事务所@21cn.com (会计师事务所) Date: Mon, 14 Jul 03 10:27:22 中国标准时间 Subject: [LON-CAPA-cvs] 我们是深圳市会计师事务所,我们热诚为您提供以下专业服务： Message-ID: <200307140235.h6E2ZVO26697@zaphod.lite.msu.edu> ------=_NextPart_000_005B_3E920000.BBB60002 Content-Type: multipart/alternative; boundary="----=_NextPart_001_005C_3E920000.BBB60002" ------=_NextPart_001_005C_3E920000.BBB60002 Content-Type: text/plain; charset="gb2312" Content-Transfer-Encoding: quoted-printable =D5=E2=CA=C7=D3=C3=B3=AC=CE=C4=B1=BE=B8=F1=CA=BD=B1=E0=D0=B4=B5=C4=D3=CA=BC= =FE=A3=AC=C7=EB=CA=B9=D3=C3=B3=AC=CE=C4=B1=BE=B7=BD=CA=BD=E4=AF=C0=C0=A1=A3= ------------------------------------------------------------ ------=_NextPart_001_005C_3E920000.BBB60002 Content-Type: text/html; charset="gb2312" Content-Transfer-Encoding: quoted-printable Untitled Document =

=A1=A1=A1=A1=D5=E2=CA=C7=D2=BB=B7=E2=C9=C6=D2=E2=B5=C4=C9=CC=D2=B5=D3=CA= =BC=FE=A3=AC=C3=B0=C3=C1=B4=F2=BD=C1=A3=AC=CE=D2=CF=F2=C4=FA=B5=C0=C7=B8=A3= =A1=C8=E7=B9=FB=B6=D4=C4=FA=D3=D0=CB=F9=B0=EF=D6=FA=A3=AC=CE=D2=BD=AB=B8=D0= =B5=BD=CE=DE=B1=C8=D0=C0=CE=BF=A3=A1

=A1=A1=A1=A1 =C9=EE=DB=DA=BE=FD=BA=CF=BB=E1=BC= =C6=CA=A6=CA=C2=CE=F1=CB=F9=BE=AD=B9=E3=B6=AB=CA=A1=B2=C6=D5=FE=CC=FC[1= 994]74=BA=C5=CE=C4=C5=FA=D7=BC=B3=C9=C1=A2=D3=DA=D2=BB=BE=C5=BE=C5=CB=C4=C4= =EA=C8=FD=D4=C2,=C1=A5=CA=F4=D3=DA=B6=AB=B1=B1=B2=C6=BE=AD=B4=F3=D1=A7=C1=EC= =B5=BC=A1=A3=D2=BB=BE=C5=BE=C5=C6=DF=C4=EA=CA=AE=B6=FE=D4=C2=B6=FE=CA=AE=BE= =C5=C8=D5=BE=AD=C9=EE=DB=DA=CA=D0=D7=A2=B2=E1=BB=E1=BC=C6=CA=A6=D0=AD=BB=E1= =C9=EE=D7=A2=D0=AD=D7=D6[1997]116=BA=C5=C5=FA=D7=BC=A3=AC=CD=EA=B3=C9=B8=C4= =D6=C6=CE=AA=BA=CF=BB=EF=D6=C6=BB=E1=BC=C6=CA=A6=CA=C2=CE=F1=CB=F9=A1=A3=CF=EA=C7=E9=C7=EB=BD=F8>>>= ;

=A1=A1=A1=A1=CE=D2=C3=C7=C8=C8=B3=CF=CE=AA=C4=FA=CC=E1=B9=A9=D2=BB=CF=C2= =D7=A8=D2=B5=B7=FE=CE=F1=A3=BA
=A1=F1=B7=A8=B6=A8=C9=F3=BC=C6=A3=BA=C4=EA=B6=C8=BB=E1=BC=C6=B1=A8=B1=ED=C9= =F3=BC=C6=A3=BB=B8=C4=D6=C6=A1=A2=BA=CF=B2=A2=A1=A2=B2=F0=B7=D6=A1=A2=CA=D5= =B9=BA=C9=F3=BC=C6=A3=BB=C6=C6=B2=FA=A1=A2=C7=E5=CB=E3=C9=F3=BC=C6
= =A1=F1=D7=A8=CF=EE=C9=F3=BC=C6=A3=BA=B3=F6=BE=DF=D1=E9=D7=CA=B1=A8=B8=E6=A3= =BB=C4=DA=C9=F3=A3=BB=D5=AE=C8=A8=D5=AE=CE=F1=C9=F3=BC=C6=A3=BB=BB=E1=BC=C6= =BB=F9=B4=A1=B9=A4=D7=F7=B9=E6=B7=B6=BB=AF=C9=F3=BC=C6
=A1=F1=D7=CA=B2=FA=C6=C0=B9=C0=A3=BA=B8=C4=D6=C6=A1=A2=BA=CF=B2=A2=A1=A2=B2= =F0=B7=D6=A1=A2=CA=D5=B9=BA=C6=C0=B9=C0=A3=BB=C6=C6=B2=FA=A1=A2=C7=E5=CB=E3= =C6=C0=B9=C0=A3=BB=D7=A8=C0=FB=BC=B0=CE=DE=D0=CE=D7=CA=B2=FA=C6=C0=B9=C0
=A1=F1=CB=B0=CE=F1=B4=FA=C0=ED=A3=BA=CB=B0=CE=F1=B5=C7=BC=C7=A3=BB=C4=C9=CB= =B0=C9=EA=B1=A8=A3=BB=C4=C9=CB=B0=B3=EF=BB=AE
=A1=F1=B4=FA=C0=ED=BC=B0=D7=C9=D1=AF=A3=BA=C6=F3=D2=B5=B3=A3=C4=EA=BB=E1=BC= =C6=A1=A2=CB=B0=CE=F1=B9=CB=CE=CA=A3=BB=B4=FA=C0=ED=BC=C7=D5=CB=A3=BB=CA=D5= =B9=BA=A1=A2=BC=E6=B2=A2=B2=DF=BB=AE=A3=BB=D5=AE=CE=F1=D6=D8=D7=E9=B2=DF=BB= =AE
=A1=F1=C5=E0=D1=B5=A3=BA=B2=C6=CE=F1=A1=A2=BB=E1=BC=C6=D6=C6=B6=C8=C5=E0=D1= =B5=A3=BB=BB=E1=BC=C6=B5=E7=CB=E3=BB=AF=C5=E0=D1=B5=A3=BB=B2=C6=CE=F1=C8=ED= =BC=FE=B4=FA=C0=ED=CF=EA=C7=E9=C7= =EB=BD=F8>>>

Enroll One Student

+ + + + + + + +

Username:
Domain:	$domform
	+ +

+END + return; +} + sub print_enroll_single_student_form { my $r=shift; $r->print("

Enroll One Student

"); - my $today = time; - my $halfyear = $today+15552000; - my $defdom=$r->dir_config('lonDefDomain'); - # Set up authentication forms - my ($krbdef,$krbdefdom) = - &Apache::loncommon::get_kerberos_defaults($defdom); - my $javascript_validations=&javascript_validations($krbdefdom); - my %param = ( formname => 'document.studentform', - kerb_def_dom => $krbdefdom, - kerb_def_auth => $krbdef - ); - my $krbform = &Apache::loncommon::authform_kerberos(%param); - my $intform = &Apache::loncommon::authform_internal(%param); - my $locform = &Apache::loncommon::authform_local(%param); - # Set up domain selection form - my $domform = &domain_form($defdom); + # + my $username = $ENV{'form.cuname'}; + my $domain = $ENV{'form.cudomain'}; + my $home = &Apache::lonnet::homeserver($username,$domain); + # $new_user flags whether we are creating a new user or using an old one + my $new_user = 1; + if ($home ne 'no_host') { + $new_user = 0; + } + &Apache::lonnet::logthis('home = '.$home); + # + my $user_data_html = ''; + my $javascript_validations = ''; + if ($new_user) { + my $defdom=$r->dir_config('lonDefDomain'); + # Set up authentication forms + my ($krbdef,$krbdefdom) = + &Apache::loncommon::get_kerberos_defaults($defdom); + $javascript_validations=&javascript_validations($krbdefdom); + my %param = ( formname => 'document.studentform', + kerb_def_dom => $krbdefdom, + kerb_def_auth => $krbdef + ); + my $krbform = &Apache::loncommon::authform_kerberos(%param); + my $intform = &Apache::loncommon::authform_internal(%param); + my $locform = &Apache::loncommon::authform_local(%param); + # + # Set up domain selection form + my $homeserver_form = ''; + my %servers = &Apache::loncommon::get_library_servers($domain); + $homeserver_form = '\n"; + # + # + $user_data_html = <User Data for $username\@$domain + + + + + + + + + + + +

First Name:
Middle Name:
Last Name:
Generation:
Home Server:	$homeserver_form

Password

+Please select an authentication mechanism + +

+$krbform +

+$intform +

+$locform +

+END + } else { + # User already exists. Do not worry about authentication + my %uenv = &Apache::lonnet::dump('environment',$domain,$username); + $javascript_validations = &javascript_validations_without_auth(); + $user_data_html = <User Data for $username\@$domain + +

+ + + + + + + + +

First Name:	+ +
Middle Name:	+ +
Last Name:	+ +
Generation:	+ +

+END + } my $date_table = &date_setting_table(); - # Print it all out + # Print it all out $r->print(< - - + + + + -

Personal Data

- - - - - -

First Name:
Middle Name:
Last Name:
Generation:

Login Data

Username:

Domain: $domform

Note: login settings below will not take effect if the user already exists -

-$krbform -

-$intform -

-$locform -

+$user_data_html

Course Data

@@ -1648,7 +1761,8 @@ upload enrolling enroll students based on upload drop undefined print the classlist ready to drop drop done drop the selected students - enrollstudent undefined print single student enroll menu + enrollstudent undefined print student username domain form + enrollstudent gotusername print single student enroll menu enrollstudent enrolling enroll student classlist undefined print html classlist classlist csv print csv classlist @@ -1716,11 +1830,13 @@ } } elsif ($ENV{'form.action'} eq 'enrollstudent') { if (! exists($ENV{'form.state'})) { + &get_student_username_domain_form($r); + } elsif ($ENV{'form.state'} eq 'gotusername') { &print_enroll_single_student_form($r); } elsif ($ENV{'form.state'} eq 'enrolling') { &enroll_single_student($r); } else { - &print_enroll_single_student_form($r); + &get_student_username_domain_form($r); } } elsif ($ENV{'form.action'} eq 'classlist') { if (! exists($ENV{'form.state'})) { --matthew1058196359-- From lon-capa-cvs@mail.lon-capa.org Mon Jul 14 17:11:19 2003 From: lon-capa-cvs@mail.lon-capa.org (ng) Date: Mon, 14 Jul 2003 16:11:19 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /homework grades.pm Message-ID: ng Mon Jul 14 12:11:19 2003 EDT Modified files: /loncom/homework grades.pm Log: show response type for jeremy to debug. Index: loncom/homework/grades.pm diff -u loncom/homework/grades.pm:1.114 loncom/homework/grades.pm:1.115 --- loncom/homework/grades.pm:1.114 Mon Jul 14 10:43:39 2003 +++ loncom/homework/grades.pm Mon Jul 14 12:11:19 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.114 2003/07/14 14:43:39 bowersj2 Exp $ +# $Id: grades.pm,v 1.115 2003/07/14 16:11:19 ng Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2662,8 +2662,6 @@ my ($request) = @_; my $navmap = Apache::lonnavmaps::navmap-> new($ENV{'request.course.fn'}.'.db', $ENV{'request.course.fn'}.'_parms.db',1, 1); - - #my $res = $navmap->firstResource(); # temp resource to access constants $navmap->init(); # End navmap using boilerplate @@ -2814,12 +2812,13 @@ my @versionKeys = split(/\:/,$record{$version.':keys'}); my @displaySub = (); foreach my $partid (@{$parts}) { + my $responseType = $curRes->responseType($partid); my @matchKey = grep /^resource\.$partid\..*?\.submission$/,@versionKeys; next if ($record{"$version:resource.$partid.solved"} eq ''); # next if ($record{"$version:resource.$partid.award"} eq 'APPROX_ANS' && # $record{"$version:resource.$partid.solved"} eq ''); $displaySub[0].=(exists $record{$version.':'.$matchKey[0]}) ? - 'Part '.$partid.' '. + 'Part '.$partid.' Type:'.$responseType.':endtype'. ($record{"$version:resource.$partid.tries"} eq '' ? 'Trial not counted' : 'Trial '.$record{"$version:resource.$partid.tries"}).' '. $record{$version.':'.$matchKey[0]}.'
' : ''; From jawe@upipm.com Mon Jul 14 18:42:25 2003 From: jawe@upipm.com (jawe@upipm.com) Date: Tue, 15 Jul 2003 01:42:25 +0800 Subject: [LON-CAPA-cvs] =?GB2312?B?1+7Qws34wue8vMr118rBzw==?= Message-ID: <200307141741.h6EHfsO31292@zaphod.lite.msu.edu> ---------------------------------------------------------------------------------------------------------------
尊敬的朋友，若您不希望再次收到我们的邮件：请点击这里进入退订系统 ，谢谢
---------------------------------------------------------------------------------------------------------------
《网络技术方案》 + 高级PHP，ASP，JAVA、VB、PB、DELPHI、VC 源码系列光盘
本集收录了全国各地大量网络系统和系统集成方面的资料、方案、规划、技术、解决方案等等珍贵材料！内容涉及包括政府、校园、广电、金融、电子商务、税务、社保、宽带网、智能小区等十多个行业！几百个成功的系统集成设计、施工方案，极有价值的内部全真资料（包括：解决方案、设计方案、标书、网络安全资料、商业计划书）。

资料样品点击这里下载 内容简介 | 光盘预览 | 货比三家 | 定货联系

系统集成光盘目录售价300圆

1、宽带网城域网-------------------------------------------------------------------11篇
2、电子商务网站-------------------------------------------------------------------26篇
3、网络安全------------------------------------------------------------------------6篇
4、网络管理-----------------------------------------------------------------------13篇
5、网络方案------------------------------------------------------------------------4篇
6、呼叫中心------------------------------------------------------------------------5篇
7、TCP/IP培训----------------------------------------------------------------------3篇
8、视频会议、VOD------------------------------------------------------------------13篇
9、VOIP----------------------------------------------------------------------------5篇
10、IP电话-------------------------------------------------------------------------9篇
11、建设规范书--------------------------------------------------------------------13篇
12、访问服务器--------------------------------------------------------------------21篇
13、金融--------------------------------------------------------------------------26篇
14、广电---------------------------------------------------------------------------5篇
15、政府--------------------------------------------------------------------------24篇
16、校园--------------------------------------------------------------------------19篇
17、邮政---------------------------------------------------------------------------3篇
18、社保---------------------------------------------------------------------------6篇
19、公检法-------------------------------------------------------------------------3篇
20、计费--------------------------------------------------------------------------xx篇
21、税务---------------------------------------------------------------------------3篇
23、办公自动化--------------------------------------------------------------------15篇
24、容错、备份--------------------------------------------------------------------11篇
25、技术解决方案------------------------------------------------------------------58篇
26、无线传输-----------------------------------------------------------------------5篇
27、投标书-------------------------------------------------------------------------7篇
28、智能楼宇----------------------------------------------------------------------10篇
29、综合布线----------------------------------------------------------------------12篇
30、幻灯片------------------------------------------------------------------------18篇
31、工程图纸----------------------------------------------------------------------88篇
32、Cisco资料--------------------------------------------------------------------xxx篇
33、管理员手册--------------------------------------------------------------------20篇
34、销售方案-----------------------------------------------------------------------7篇
35、其它--------------------------------------------------------------------------24篇
新鲜出笼：
36、最新中标解决方案精选2001-2002----------------------------------------111篇
网络提升服务－思科解决方案在商检系统的应用.zip
公安计算机应用软件技术白皮书.zip
**公司机场生产运营管理系统..zip
城域网解决方案.zip
运筹方寸之间，决策千里之外--**市城市规划局广域网络系统工程.zip
让地下银龙插上信息化的翅膀--**地铁总公司计算机网络系统建设方案.
**省政府信息网一期工程.zip
开辟无线网络新空间－思科佳盈协力推进行业应用.zip
联创系统安全解决方案.zip
系统集成-全国九七纵向联网..zip
**炼油厂企业网建设方案.zip
菲旺石油石化企业全面电子化管理解决方案.zip
**油田广域网.zip
*****油田海洋船舶公司视频会议解决方案.zip
长达科技虚拟私人网络.zip
快威电子学习解决方案.zip
中联数字化图书馆网络解决方案.zip
Davnet引领UOBPlaza&ShawHouse进入无线接入世界.zip
对于格林斯博罗市来说，采用无线网络将像增加了不用付工资的工作人员一样.zip
竞标成功的背后--大连有线电视宽带多媒体骨干网创造两项第一.zip
宽带接入解决方案.zip
宽带小区计费解决方案.zip
网络管理系统方案建议书.zip
Aironet无线网络产品系列解决方案.zip
Cisco中小企业网络解决方案.zip
IBMIP电话.zip
IBMIP语音（VoIP）.zip
IBM网络安全服务.zip
IBM网络管理服务.zip
IBM网络模型建立.zip
IBM网络评估服务.zip
IBM网络咨询服务.zip
IBM无线局域网.zip
IBM先进布线系统.zip
Procurement网上采购系统.zip
VOIP整体解决方案.zip
办公自动化系统介绍.zip
长达科技有限公司IPBSG电子商务平台.zip
长达科技有限公司互联网数据中心.zip
互联网行业解决方案.zip
企业安全方案.zip
威发IP计费系统解决方案.zip
威发系统安全保障.zip
先进数通公司服务体系.zip
...............................................................................................

1、宽带网
**省广域网设计方案.rtf
**省宽带多媒体通讯网工程文档.doc
网通IP over DWDM宽带网络概貌.doc
**市本地宽带网络建设.doc
**省地铁局域网和城域网解决方案.doc
**省宽带主干网络光缆管道建设工程.doc
深圳市IP　城域网组网方案.doc
中国网通**省城域网大屏幕显示系统建议书.doc
中国网通高速互联网网络示范工程-宽带多媒体视频点播/直播系统试验局方案.doc
中国网通宽带无线网接入网项目建议书.doc
**市市高盛大厦宽带网络方案..doc
2、电子商务
蓬天的解决方案.rtf
太合商务网络有限公司计算机网络系统投标书.doc
百得联汽配网站建设意见书.doc
北京xxx组建ICP网络.doc
电子商城技术方案书.doc
红牛电子商务网方案建议书.doc
*****局以知识管理为核心的信息平台规划建议书.doc
宽带**热线网站建设建议书.doc
**市公众信息服务系统方案建议书.doc
**市信息网Web服务器负载平衡的解决方案.doc
**省热线II试验网接入部分方案.doc
**证券南宁营业部网上交易系统解决方案.doc
*****在线电子商务系统方案建议书.doc
网上超市方案建议书.doc
实现电子商务真正价值.doc
*****娱乐网系统集成方案.doc
"乐佳盟"智能化社区网站设计方案.doc
方案报价.xls
3、网络安全
天融信网络信息解决方案.doc
美国安泰成发国际集团公司-网络安全解决方案.doc　　　　
***公司海关信息系统VPN及加密解决方案.doc
电子商务安全技术.doc
大型企业安全解决方案.mht
大型ICP网站安全解决方案.mht
4、网络管理
网络管理解决方案.doc
网络管理方案.doc
网管中心技术标准.doc
网管教程.doc
网管HP 有关的培训课程.doc
联通数据网网络管理.doc
HP NetMetrix/UX 网络业务量监测系统建议书.doc
Crosskey兼容网管.doc
INTERNET的网管接驳新技术---CyberGate 8000.doc
5、网络方案
网络方案素材.ppt
网络逻辑结构范例.ppt
网络拓扑结构1.ppt
网络拓扑结构2.ppt
6、呼叫中心
**省国信呼叫中心及增值业务平台项目建设规划书.doc
CallCenter投诉业务子系统需求规格说明书.doc
客户服务中心系统方案建议书.doc
业务咨询子系统系统设计说明书.doc
***省移动通信客户服务省中心项目建议书.doc
7、Tcp、ip培训
Ip an router教材.doc
TCP/IP基础教程.doc
TCP/IP原理.doc
8、视频会议、VOD
*****省VOD系统方案建议书.doc
迎接数字媒体的挑战.doc
信息网上直播方案.doc
开发区泰达研修中心报告厅远程电视会议系统推荐书.doc
数字视频解决方案.doc
利用卫星通信组建会议电视网.doc
让数字的力量打造企业形象.doc
流式媒体解决方案.doc
*****市国税局视频点播(VOD)系统方案.doc
金山视频流服务中心技术方案.doc
XX市广播电视局宽带多媒体IP网络方案建议书.doc
兰州市集群VOD系统方案建议书..doc
*****省数据通信局 VOD 系统使用方案.doc
9、VOIP
NBX3000IP图解.doc
NBX3000 工作原理图式.doc
首创网络有限公司VoIP建设方案.doc
VOIP图解.doc
VOIP图解1.doc
10、IP电话
CNC VoIP工程承载网网络实施方案总体设计(v1.0)..doc
长天公司IP电话项目方案.doc
中国联通广东分公司IP Phone业务实施方案建议书.doc
VocalTec IP系统介绍.doc
IP电话技术以及与传统电话的对比.doc
IP电话网设计方案.doc
Ip phone业务质量及Cisco 3640测试报告.doc
IP Phone结构及应用.doc
IP电话原理.doc
11、建设规范书
中国联通数据网技术规范书（IP部分）.doc
数据通信业务中国公众多媒体通信网(CNINFO)业务处理规范(试行).doc
武汉热线扩容技术规范书(用户管理计费系统).doc
通信设备工程验收规范.doc
通信设备工程安装施工规范.doc
上海公共信息网三期工程技术与工程要求.doc
海南省ATM宽带多业务网工程技术规范书.doc
广东省视聆通第五期扩容工程技术规范书.doc
广东省多媒体通信网络规划原则和建议.doc
广东省计算机互联网第四期扩容工程技术规范书.doc
163、169网络和业务调整工程工程技术规范书.doc
广东省VOIP/FOIP实验应用平台工程技术规范书.doc
CHINANET-GD计费系统规范.doc

资料样品请点击这里下载 内容简介 | 光盘预览 | 货比三家 | 定货联系

以后的系统集成方案升级我们会免费发送到你的信箱！

====================================================================
以下为PHP，ASP，JAVA、VB、PB、DELPHI、VC 源码系列光盘
====================================================================
样品展示：虚拟主机购物商城

黄金源代码程序 价格：220元
工商资源信息商务网 创新网络办公系统 天心新闻系统1.15版太阳之家超级论坛 Eshop3000网络智能购物系统
百业信息网商务系统花城成人用品商务网 大型BTOB商务站点 铁16局网络办公系统
跨国公司产品展览国际咨询公司商务大型房产信息置换网百思得购房超市企业贸易信息网
超级广告链系统（类似太极链）性用品商场专买网千万员工管理系统聊聊语音聊天室
网络游戏论坛专区五星级广告专业信息网人力资源管理系统人才招聘系统专业物流信息网站
中关村信息港大型网络交友系统网上大型音响超市（类似8848购物网）全自动智能建站系统
样品演示：大型BTOB商务站点 http://www.chinaediamond.com/

高级源代码程序光盘，（分PHP，ASP，JAVA、VB、PB、DELPHI、VC ）

PHP源代码光盘： 价格：300元
（由近600套PHP各类系统组成，系统分类涉及20大类，系统带有完整地中文说明及数据库，是初者及高级开发人员必备资料，对开发各类系统具有很高的参考价值）
包括：
PHP（3个）：articles、source、tools
编辑工具（2个）：MYSQL数据库备份工具、PHP语法编辑器
电子购物（18个）：PHP+MYSQL-购物程序、PHP2000购物车、PJPMYSQL电子商务方案、php-mysql
网上商店shop、PHP大型电子商务程序、PHP的拍卖系统、PHP电子购物程序系
统、PHP电子商务解决方案源代码、php购物车、php写的购物程序英文版、
PHP营销程序系统、购物PHP程序、国外的PHP电子商务程序、拍卖市场、拍卖
系统、商贸网全站系统、英文在线购物程序、在线拍卖系统
广告管理（13个）：1：24-PHP文本广告交换系统、MyAdServer广告系统、php大型广告链、php广
告管理系统、PHP广告链-最新版、PHP小型网站广告管理程序系统、点击广告
付费php系统、广告管理系统、广告列表、广告投放系统、强大的广告管理程
序、文本广告交换链PHP程序、文本交换PHP系统
计数器（19个）：php+flash计数器、PHP＋MySQL的访问统计、PHP＋MySQL的统计程序、
PHP+MYSQL的统计计数器、PHP+mysql网站统计排行榜程序英文版、PHP-MYSQL计
数、php计数器、PHP透明8位计数器、PHP英文的访问统计程序、多用户多图象
计数器、多用户计数器、多用户流量分析、记录上次登录时间代码、论坛流量
统计功能、网站流量分析、修改版多用户统计计数器、一个PHP计数器、一个
PHP统计程序系统、自由上传图片的多用户计数器
聊天室（17个）：EDphp语音聊天室、Mazen's聊天室、OpenChat聊天室、PHP3与MYSQL式聊天室、
php超级酷聊天程序、PHP聊天室、php聊天室2、PHP聊天室3、PHP聊天室程序英
文版、php语音聊天室、多用户PHP语音聊天室、黑白网聊天系统、聊天广场、
台湾人写的php聊天程序、文本型数据库PHP聊天室、真正的php聊天室
另类其他(63个)：IP物理地址查询、MYSQL＋PHP网站管理系统程序、PHP MySQL 数据库管理完整
登录版、php-midi音乐欣赏台、PHP大型兼职网络程序、php的扫雷游戏、PHP的
同学录程序、php的小挪移程序、PHP飞林庄全站代码、php贺卡程序、PHP会员
管理程序、PHP全套网站程序、php全套网站建设所需系统、php商贸网、php同
学录在线注册添加、PHP万年历、PHP网站管理系统程序、PHP与MySQL交互使用
详解、VBulletin中文标准版、vBulletin中文功能增强版、zip文件上传后自动
解压程序源代码、把握时间网站管理PHP程序、测试COOKIE的一个PHP程序、产
生NEXTBACK滑动条的PHP插件、超级建站程序集PHP系统程序、大型兼职网络程
序、导入和导出sql数据、多用户虚拟域名(数据库)免费版、贺卡程序、简单的
用户论证和SESSION的管理、简易办公系统1.1、漫步精品全套PHP建站程序、浓
情咖啡屋（vbb论坛模板）1.0、钦枫居的主页弹出来窗口、全套建设网站PHP
程序-采用文本方式、全套网站管理系统、全站发布程序、热线原代码汉化的世
界各地域名查询系统、世纪万年历、所有原代码的程序同学录(php)、天气预报
程序、同学录、同学录(php)、同学录商业版、图书管理系统、完整的同学录
(php)、网站登陆php程序、网站管理系统、小游戏PHP小程序、星际迷航MUD游
戏汉化版、音乐点播系统、英文会员管理系统、用PHP做到即时简繁切换的小程
序源代码、用户注册PHP程序、邮票收集商业版本、域名注册空间申请注册系统
PHP程序、域名转向PHP程序、远程学生成绩查询系统（基于PHP+MYSQL可用于
WINDOWS）、在Web上操作MySQL数据库、在线音乐系统V1.0、整套网站程序系
统、支持照片上传的PHP同学录修改版、抓新闻站点到你的MYSQL数据库
留言薄(24个)：“COOL”留言本、ALI留言本云开雾散版php程序、Comments留言本、ExGB最好的
PHP文本多用户留言簿、gb2000留言板、PHP+MySQL简单留言本1.0、PHP+MYSQL留
言本、phpBook留言簿汉化版PHP程序、phpbook留言板汉化增强版、PHP的留言板
程序、php多用户留言本、PHP脚本,包括多用户记数器,多用户留言本、PHP留言
板、PHP留言本、PHP留言本（单用户版）、PHP留言本1、php留言本程序,多用户
版的、PHP文本留言簿、框架式留言本（PHP）程序、来客签到簿、留言4、留言
板3、实用的留言簿程序、支持oicq头像的php留言簿
论坛社区(49个)：AnotherPHP英文版论坛程序、bbs、BBS 3.0完全版、bbs3000、PHP+MYSQL脚本
论坛、PHP3+mySQL支持多语言的php3论坛v1.11最新版、phpbbs、phpnuke最新汉
化版、PHP程序论坛、PHP江湖社区、PHP论坛v1.0、php论坛英文版、php相当好
的论坛、PHP虚拟社区MySQL版、PHP英文版论坛程序系统、upb论坛 PHP程序、
upb论坛PHP版bbs、vb2.0.0正式完全汉化版、2.0Final论坛PHP程序、vb2.0论坛
Final无安全问题版、vb2.2论坛PHP程序系统、vB20、VBB2、vbb203簡體版、
vBulletin、vb论坛调用新新贴源代码、vb论坛最新英文原版vb2.0、XMB论、多
级别PHP论坛程序、仿bbs3000论坛PHP程序系统、仿IB5000论坛、韩国论坛、汉
化版本PHP论坛程序、汉化的php论坛、汉化加强版PHP论坛程序、荷音社区、开
设多个论坛Homepage-Builder中文版、论坛程序、论坛社区PHP+MYSQL程序系
统、论坛系统、相当好的论坛脚本、星伴论、虚拟社区 MySQL、英文PHP论坛系
统程序、英文原版论坛PHP程序、最酷的PHP+MYSQL商业版论坛程序、最新php社
區系統pslash、最新vbb论坛2.0.3汉化版、最新汉化版
搜索引擎(5个)：PHP搜索引擎、PHP搜索引擎英文版、PHP搜索引擎源代码、多元搜索引擎系统源
代码PHP程序、搜索引擎
投票系统(7个)：phpPoll、php调查表单、PHP调查系统、PHP选票统计系统、全功能投票系统PHP
程序、投票调查、在线调查程序
文件管理(18个)：PHP的英文相片管理、PHP图片管理、PHP图像上载程序英文版、php文件管理
器、PHP文件上载文件、多文件上传程序、多用户相片管理、防止别人连接你的
文件-图片的PHP程序、精品桌面PHP图片管理程序系统、树状目录菜单英文php
版、图片管理php系统、图片管理php系统2、文本管理系统、文件管理器、显示
指定目录列表的PHP程序、页面图象处理英文版、在线编辑php系统程序、自由上
传图片的多用户计数器
下载系统(12个)：Download counter v1.1、MP3下载php管理程序、PHP文本下载系统、php下载、
精品桌面下载管理系统、软件下载系统简体版、下载管理器、下载系统、下载系
统2、下载系统简体版、音乐下载管理系统
新闻发布(26个)：HotWater 新闻管理系统、php文章管理、php文章管理在线添加文章分类、php
文章管理在线添加文章分类、php新闻扒手、PHP新闻程序、php新闻系统程序、
php新闻小程序、ymNews、调用sina新闻的php小程序、更新日制管理、培训信息
发布php系统最新修正版、培训信息发布php系统最新修正版、首页更新程序、首
页公告PHP程序、网站新闻发布及首页更新程序、文章管理、文章管理2、文章管
理系统、新闻发布程序、新闻更新系统1.0、新闻管理PHP系统、新闻管理系统
sql版、新闻滚动显示、新闻小偷升级版、新聞分類原始碼、在线新闻&管理系
统、主页更新公告板
邮件管理(6个)：html表格发电子邮件PHP小程序、ZX邮件小列表V1.0、超强电子邮局系统、大型
商务网站电子邮件系统、邮件反馈单、邮件列表管理程序
自助连接(6个)：dslink程序、PHP程序文本交换链links、PHP万链程序系统英文版、PHP万链程序
系统英文版、php友情链接、PHP自动友情联接系统、网站链接系统汉化版PHP程序

ASP源代码光盘： 价格：300元

通杰大型新闻发布系统通杰大型新闻发布系统升级版达达旅游网站全站系统彭城IT网全站系统
名校教育平台家教系统名校教育平台家教系统数据库政府型工商红盾信息网中国计生委网络办公系统
新科视频点播系统考试系统--单选题考试系统考试系统--填空题考试系统校园网络信息发布系统
校园学籍成绩图书管理系统手机专业信息网礼品赠送、购买专业网 E-HOME网友社区专业版
企业信息商务网大型市场商务信息网信息港人才招聘频道乐天笑话站全站代码
酒城娱乐网购物系统网站搜索管理器会员制音乐网站系统蜘蛛人产品反馈系统
缘来是你交友系统最新版浪子中文文学站心动娱乐网图片站程序智能金领网络办公系统
软件方案大全最新酒客留言系统长乐音乐站最新程序拜拜了聊天系统
景易网络办公系统安装版景易网络办公系统解密版在线办公平台网络版列车时刻查询系统
列车时刻查询系统数据库中国网联OA办公系统 vodweb视频点播系统修改版汽车专业网站全站系统
金陵网络办公系统access版易索咨询网络全站系统电影会员系统程序电子商务供求系统
就是流行梯形论坛 专业大型虚拟主机域名申请系统 网页版QQ在线聊天系统大型医院网站全站系统
房地产专业网站系统电子商务先锋网站系统美容网络全站代码木子料理饮食网站
省信息港全站代码服装购物网全站代码同方网络办公自动化系统2002版纽约人才市场
网络化分销系统 企业自动建站系统标准版 就是流行中文网全站系统南方假日旅游网
某省公安厅网站系统网络化客户管理系统雨烟大型新闻发布系统雨烟大型新闻发布系统数据库 jsp大型数据库论坛系统
海越商务网络全站系统海越商务网络数据库美联达网络办公OA系统 网站自动生成与发布系统超级版
中国旅游商务在线网中国旅游商务在线网数据库 校园综合网络管理系统 奥特网络智能办公系统
中国企业黄页网超级access密码察看器奈特语音聊天系统达维交友网络系统
网络电台点播系统全能综合型网站系统山易克论坛系统小猪崽同学录系统
OPO中国人论坛 new智慧之颠新闻发布系统全品网络订货系统 更多……

Delphi源码光盘价格：240元
光盘资料主要介绍Delphi中主要控件的详细的使用及技巧，光盘中蕴涵了近千套系统模块。

Visual Basic源码光盘价格：220元

Visual Basic实用版内容主要针对VB专业程序设计人员而设计整理的纯资料性质的光盘，光盘资料主要介绍VB中主要控件的详细的使用及技巧，以及这些控件的组合使用技巧等等。光盘中除带有常用模块之外还带有众多的大中型成品系统（完全开放代码），其中大多数是本公司对外承接的项目，如果您VB爱好者或专业编程人员的话，这套资料将为您的学习和工作增添重重的砝码。

Visual C++ 源码光盘价格：220元
Visual C++实用版内容主要针对VC专业程序设计人员而设计整理的纯资料性质的光盘，光盘资料主要介绍VC中主要控件的详细的使用及技巧，以及这些控件的组合使用技巧等等。光盘中除带有常用模块之外还带有众多的大中型成品系统（完全开放代码，带设计说明及开发手册），其中大多数是本公司对外承接的项目，如果您VC爱好者或专业编程人员的话，这套资料将为您的学习和工作增添重重的砝码。

JAVA 源码光盘价格：250元
目前IT业界最流行的程序员便是JAVA专职程序人员，我们的工作人员为了迎合这股时代的潮流，为广大想学习JAVA的程序人员收集了众多的JAVA源程序，其中大多数目前都被全国各大企业所使用，也有不少系统是用VJ++开发的，系统都带有开发说明书及用户手册等文本资料，是JAVA初学者和开发人员的优秀参考资料。

PowerBuilder源码光盘价格：280元
完整MIS系统列表(源代码)

商品销售系统，峪张公司销售系统，XX公司财务系统，学生学籍管理系统，学院教材室期刊论文管理系统

城市供暖收费系统（C/S结构），大学学生信息管理审核系统，列车时刻查询系统

以上全部光盘优惠价：1500元 所有光盘资料、程序都经过测试，100%正常运行使用，保证质量。

以上光盘详情请点击这里查看

购买方式：
请点击这里填写购买表单
发货方式：EMS快递光盘（1-2天到货） 单位购买可开具发票
关于款到发货方式，公司帐号请见购买表单，信誉保证，成功案利
晶资源网络信息服务中心

---------------------------------------------------------------------------------------------------------------
尊敬的朋友，若您不希望再次收到我们的邮件：请点击这里进入退订系统 ，谢谢
---------------------------------------------------------------------------------------------------------------
From lon-capa-cvs@mail.lon-capa.org Mon Jul 14 19:41:40 2003 From: lon-capa-cvs@mail.lon-capa.org (sakharuk) Date: Mon, 14 Jul 2003 18:41:40 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /homework response.pm Message-ID: sakharuk Mon Jul 14 14:41:40 2003 EDT Modified files: /loncom/homework response.pm Log: Bug 1848 is fixed. Now it's possible to print answers in the same way as they appear in the problem body. Index: loncom/homework/response.pm diff -u loncom/homework/response.pm:1.80 loncom/homework/response.pm:1.81 --- loncom/homework/response.pm:1.80 Mon Jun 23 16:57:41 2003 +++ loncom/homework/response.pm Mon Jul 14 14:41:40 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # various response type definitons response definition # -# $Id: response.pm,v 1.80 2003/06/23 20:57:41 albertel Exp $ +# $Id: response.pm,v 1.81 2003/07/14 18:41:40 sakharuk Exp $ # # Copyright Michigan State University Board of Trustees # @@ -378,7 +378,7 @@ my ($type,$answer) = @_; my $result; if ($ENV{'form.answer_output_mode'} eq 'tex') { - $result = ' '.$answer.'\\\\ \hline '; + $result = ' \verb|'.$answer.'|\\\\ \hline '; } else { $result = ''.$answer.''; } From lon-capa-cvs@mail.lon-capa.org Mon Jul 14 20:13:38 2003 From: lon-capa-cvs@mail.lon-capa.org (bowersj2) Date: Mon, 14 Jul 2003 19:13:38 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /interface lonnavmaps.pm Message-ID: bowersj2 Mon Jul 14 15:13:38 2003 EDT Modified files: /loncom/interface lonnavmaps.pm Log: This was causing the RESPONSE_TYPES processing to fail completely. Index: loncom/interface/lonnavmaps.pm diff -u loncom/interface/lonnavmaps.pm:1.213 loncom/interface/lonnavmaps.pm:1.214 --- loncom/interface/lonnavmaps.pm:1.213 Mon Jul 14 11:01:07 2003 +++ loncom/interface/lonnavmaps.pm Mon Jul 14 15:13:38 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.213 2003/07/14 15:01:07 bowersj2 Exp $ +# $Id: lonnavmaps.pm,v 1.214 2003/07/14 19:13:38 bowersj2 Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3368,7 +3368,7 @@ my $part = shift; $self->extractParts(); - return $self->{RESPONSE_TYPE}->{$part}; + return $self->{RESPONSE_TYPES}->{$part}; } sub responseIds { From lon-capa-cvs@mail.lon-capa.org Mon Jul 14 20:26:24 2003 From: lon-capa-cvs@mail.lon-capa.org (matthew) Date: Mon, 14 Jul 2003 19:26:24 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /interface lonsearchcat.pm Message-ID: matthew Mon Jul 14 15:26:24 2003 EDT Modified files: /loncom/interface lonsearchcat.pm Log: Bug 1752: import fails with only one resource. Updated javascript to detect the case of a non-array of the form element "returnvalues". Index: loncom/interface/lonsearchcat.pm diff -u loncom/interface/lonsearchcat.pm:1.184 loncom/interface/lonsearchcat.pm:1.185 --- loncom/interface/lonsearchcat.pm:1.184 Mon Jul 14 09:54:02 2003 +++ loncom/interface/lonsearchcat.pm Mon Jul 14 15:26:24 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Search Catalog # -# $Id: lonsearchcat.pm,v 1.184 2003/07/14 13:54:02 matthew Exp $ +# $Id: lonsearchcat.pm,v 1.185 2003/07/14 19:26:24 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2741,10 +2741,19 @@ $result.=< -You have $awarded*$weight points out of $weight. +You have $awarded*$weight out of $weight possible points. From lon-capa-cvs@mail.lon-capa.org Tue Jul 15 19:50:43 2003 From: lon-capa-cvs@mail.lon-capa.org (bowersj2) Date: Tue, 15 Jul 2003 18:50:43 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /interface lonhelp.pm Message-ID: bowersj2 Tue Jul 15 14:50:43 2003 EDT Modified files: /loncom/interface lonhelp.pm Log: Allow the joining together of various help files by seperating the names with commas in the file name. Index: loncom/interface/lonhelp.pm diff -u loncom/interface/lonhelp.pm:1.5 loncom/interface/lonhelp.pm:1.6 --- loncom/interface/lonhelp.pm:1.5 Tue Feb 25 17:50:11 2003 +++ loncom/interface/lonhelp.pm Tue Jul 15 14:50:43 2003 @@ -132,17 +132,26 @@ my $docroot = $r->dir_config('lonDocRoot'); my $serverroot = $ENV{'HTTP_HOST'}; - my $filename = substr ($ENV{'REQUEST_URI'} , + my $filenames = substr ($ENV{'REQUEST_URI'} , rindex($ENV{'REQUEST_URI'}, '/') + 1, -4); # Security check on the file; the whole filename must consist # of nothing but alphanums, ' ,, or ., or the file # will be "not found", no matter what. - return HTTP_NOT_FOUND if ($filename !~ /\A[-0-9a-zA-z_'',.]+\Z/); + return HTTP_NOT_FOUND if ($filenames !~ /\A[-0-9a-zA-z_'',.]+\Z/); - (my $file = Apache::File->new($docroot . "/adm/help/tex/".$filename.'.tex')) - or return HTTP_NOT_FOUND; + # Join together the tex files, return HTTP_NOT_FOUND if any of + # them are not found + my $tex = ''; + my @files = split(/,/, $filenames); + + for my $filename (@files) { + (my $file = Apache::File->new($docroot + . '/adm/help/tex/'.$filename.'.tex')) + or return HTTP_NOT_FOUND; + $tex .= join('', <$file>); + } # get me my environment if it exists &Apache::lonacc::handler($r); @@ -165,7 +174,6 @@ } } - my $tex = join('', <$file>); $tex = render($tex, $docroot, $serverroot); serveTex($tex, $r); From lon-capa-cvs@mail.lon-capa.org Tue Jul 15 20:04:31 2003 From: lon-capa-cvs@mail.lon-capa.org (www) Date: Tue, 15 Jul 2003 19:04:31 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /interface lonmeta.pm Message-ID: www Tue Jul 15 15:04:31 2003 EDT Modified files: /loncom/interface lonmeta.pm Log: Display cleanup. Index: loncom/interface/lonmeta.pm diff -u loncom/interface/lonmeta.pm:1.32 loncom/interface/lonmeta.pm:1.33 --- loncom/interface/lonmeta.pm:1.32 Mon Jun 30 13:17:30 2003 +++ loncom/interface/lonmeta.pm Tue Jul 15 15:04:31 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Metadata display handler # -# $Id: lonmeta.pm,v 1.32 2003/06/30 17:17:30 albertel Exp $ +# $Id: lonmeta.pm,v 1.33 2003/07/15 19:04:31 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -290,6 +290,7 @@ delete($content{'lastrevisiondate'}); delete($content{'owner'}); delete($content{'copyright'}); + delete($content{'customdistributionfile'}); if ($ENV{'user.adv'}) { # ------------------------------------------------------------ Dynamic Metadata $r->print( @@ -382,20 +383,22 @@ '
Additional Metadata (non-standard, parameters, exports)
'); foreach (sort keys %content) { my $name=$_; - my $display=&Apache::lonnet::metadata($uri,$name.'.display'); - unless ($display) { $display=$name; }; - my $otherinfo=''; - foreach ('name','part','type','default') { - if (defined(&Apache::lonnet::metadata($uri,$name.'.'.$_))) { - $otherinfo.=' '.$_.'='. - &Apache::lonnet::metadata($uri,$name.'.'.$_).'; '; - } + unless ($name=~/\.display$/) { + my $display=&Apache::lonnet::metadata($uri,$name.'.display'); + unless ($display) { $display=$name; }; + my $otherinfo=''; + foreach ('name','part','type','default') { + if (defined(&Apache::lonnet::metadata($uri,$name.'.'.$_))) { + $otherinfo.=' '.$_.'='. + &Apache::lonnet::metadata($uri,$name.'.'.$_).'; '; + } + } + $r->print(''.$display.': '.$content{$name}); + if ($otherinfo) { + $r->print(' ('.$otherinfo.')'); + } + $r->print("
\n"); } - $r->print(''.$display.': '.$content{$name}); - if ($otherinfo) { - $r->print(' ('.$otherinfo.')'); - } - $r->print("
\n"); } } # ===================================================== End Resource Space Call From lon-capa-cvs@mail.lon-capa.org Tue Jul 15 20:09:49 2003 From: lon-capa-cvs@mail.lon-capa.org (bowersj2) Date: Tue, 15 Jul 2003 19:09:49 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /html/adm/help/tex Docs_About_Bulletin_Board.tex Docs_About_My_Personal_Info.tex Docs_About_Simple_Page.tex Docs_About_Syllabus.tex Docs_Alternatives.tex Docs_Creating_From_Template.tex Docs_Editing_Templated_Pages.tex Message-ID: This is a MIME encoded message --bowersj21058296189 Content-Type: text/plain bowersj2 Tue Jul 15 15:09:49 2003 EDT Added files: /loncom/html/adm/help/tex Docs_About_Bulletin_Board.tex Docs_About_My_Personal_Info.tex Docs_About_Simple_Page.tex Docs_About_Syllabus.tex Docs_Alternatives.tex Docs_Editing_Templated_Pages.tex Modified files: /loncom/html/adm/help/tex Docs_Creating_From_Template.tex Log: Modifications to the Docs files to support better help on that screen. --bowersj21058296189 Content-Type: text/plain Content-Disposition: attachment; filename="bowersj2-20030715150949.txt" Index: loncom/html/adm/help/tex/Docs_Creating_From_Template.tex diff -u loncom/html/adm/help/tex/Docs_Creating_From_Template.tex:1.3 loncom/html/adm/help/tex/Docs_Creating_From_Template.tex:1.4 --- loncom/html/adm/help/tex/Docs_Creating_From_Template.tex:1.3 Fri Jun 20 14:39:24 2003 +++ loncom/html/adm/help/tex/Docs_Creating_From_Template.tex Tue Jul 15 15:09:49 2003 @@ -1,4 +1,6 @@ -\label{Docs_Creating_From_Template}Several templates are available for you +\label{Docs_Creating_From_Template} + +Several templates are available for you to fill out and add to your course. To add a templated document to your course, click on the button for the templated @@ -8,57 +10,5 @@ titled the page, if necessary, the page will be added to the end of the current Course Documents folder. -\begin{itemize} -\item \textbf{Syllabus}\index{Syllabus} adds a traditional syllabus -page, which can be filled out with various standard Syllabus information. -\item \textbf{Simple Page} allows you to add a simple HTML page to the course, -with an area for text, and an area to add web references. Give the page a -\textbf{Title}, type plain text into the \textbf{Content} textbox, and add -any links to other resources in the \textbf{Web References} section, where -they will be turned into HTML links for the students. -\item \textbf{Bulletin Board} allows you to add a dedicated Bulletin Board page -to the course. By default in LON-CAPA, \emph{all} pages can host discussion, -but you may wish to centralize the discussion, or provide a place for general -course-related discussion. -\item \textbf{My Personal Info} will add your personal information page, which -is the same across all LON-CAPA courses you may be an instructor for. This -is a place to provide a general introduction to yourself for your students, -and a photo, if you like. -\end{itemize} -To edit the pages, click on the page's link in the Course Documents area, -next to the blue arrows, \textbf{Remove} and \textbf{Rename} link. Each template -behaves in much the same way: Several labeled fields are provided, with text -boxes below them. Fill out the ones that apply to your course. Leave the -rest blank, and they will not be displayed to students. When you are done, -click one of the \textbf{Store} buttons to save your work. - -When you click \textbf{Store}, \emph{all} changes made to any textbox on -the screen are saved. Thus, you need not click \textbf{Store} for every single -textbox; the \textbf{Store} buttons are shown next to each box for your convenience -only. - -To see how the page looks without the text boxes, click the \textbf{Public -View} or \textbf{Show Student View} link near the top of the page. This will -show you how the page looks to everyone else. - -The \textbf{My Personal Info} template and \textbf{Simple Page} templates -will allow you to upload a photo from your harddrive. Either type the path -on your harddrive to the photo you wish to upload, or click the \textbf{Browse...} -button to select a file to upload. Click the \textbf{Upload} button to copy -the photo from your hard drive to LON-CAPA. - -\textbf{Note}: The \textbf{My Personal Info} page is a special page in that it -belongs to you, not the course. Everywhere you insert that page will have the same -contents, and all changes made to one will propogate to all others. Bear -that in mind as you fill it in; since it may appear for multiple courses you -may not wish to add course-specific information. - The new document will appear in the course next time you \textbf{Re-Initialize} the course on your \textbf{ROLES} screen, or login, whichever comes first. - -All of these document types are provided for your convenience; you are -not required to use them. If for instance you prefered to create your -own Syllabus\index{Syllabus}, you can create an HTML page and either -upload it into the course like any other document (see -\ref{Docs_Uploading_From_Harddrive}), or host it on another web server -and add it as an External Resource (see \ref{Docs_Adding_External_Resource}). Index: loncom/html/adm/help/tex/Docs_About_Bulletin_Board.tex +++ loncom/html/adm/help/tex/Docs_About_Bulletin_Board.tex \label{Docs_About_Bulletin_Board} \textbf{Bulletin Board} allows you to add a dedicated Bulletin Board page to the course. By default in LON-CAPA, \emph{all} pages can host discussion, but you may wish to centralize the discussion, or provide a place for general course-related discussion. Index: loncom/html/adm/help/tex/Docs_About_My_Personal_Info.tex +++ loncom/html/adm/help/tex/Docs_About_My_Personal_Info.tex \label{Docs_About_My_Personal_Info} \textbf{My Personal Info} will add your personal information page, which is the same across all LON-CAPA courses you may be an instructor for. This is a place to provide a general introduction to yourself for your students. My Personal Info will allow you to upload a photo into it. On the editing screen, either type the path to the photo, or click the \textbf{Browse...} button to select the file to upload, and then click the \textbf{Upload} button. \textbf{Note}: The \textbf{My Personal Info} page is a special page in that it belongs to you, not the course. Everywhere you insert that page will have the same contents, and all changes made to one will propogate to all others. Bear that in mind as you fill it in; since it may appear for multiple courses you may not wish to add course-specific information. Index: loncom/html/adm/help/tex/Docs_About_Simple_Page.tex +++ loncom/html/adm/help/tex/Docs_About_Simple_Page.tex \label{Docs_About_Simple_Page} \textbf{Simple Page} allows you to add a simple HTML page to the course, with an area for text, and an area to add web references. Give the page a \textbf{Title}, type plain text into the \textbf{Content} textbox, and add any links to other resources in the \textbf{Web References} section, where they will be turned into HTML links for the students. Simple Pages allow you to upload a graphic into them. On the editing screen, either type the path to the photo, or click the \textbf{Browse...} button to select the file to upload, and then click the \textbf{Upload} button. Index: loncom/html/adm/help/tex/Docs_About_Syllabus.tex +++ loncom/html/adm/help/tex/Docs_About_Syllabus.tex \label{Docs_About_Syllabus} \textbf{Syllabus}\index{Syllabus} adds a traditional syllabus page, which can be filled out with various standard Syllabus information. Index: loncom/html/adm/help/tex/Docs_Alternatives.tex +++ loncom/html/adm/help/tex/Docs_Alternatives.tex \label{Docs_Alternatives} All of these document types are provided for your convenience; you are not required to use them. If for instance you prefered to create your own Syllabus\index{Syllabus}, you can create an HTML page and either upload it into the course like any other document (see \ref{Docs_Uploading_From_Harddrive}), or host it on another web server and add it as an External Resource (see \ref{Docs_Adding_External_Resource}). Index: loncom/html/adm/help/tex/Docs_Editing_Templated_Pages.tex +++ loncom/html/adm/help/tex/Docs_Editing_Templated_Pages.tex \label{Docs_Editing_Templated_Pages} To edit the pages, click on the page's link in the Course Documents area, next to the blue arrows, \textbf{Remove} and \textbf{Rename} link. Each template behaves in much the same way: Several labeled fields are provided, with text boxes below them. Fill out the ones that apply to your course. Leave the rest blank, and they will not be displayed to students. When you are done, click one of the \textbf{Store} buttons to save your work. When you click \textbf{Store}, \emph{all} changes made to any textbox on the screen are saved. Thus, you need not click \textbf{Store} for every single textbox; the \textbf{Store} buttons are shown next to each box for your convenience only. To see how the page looks without the text boxes, click the \textbf{Public View} or \textbf{Show Student View} link near the top of the page. This will show you how the page looks to everyone else. --bowersj21058296189-- From lon-capa-cvs@mail.lon-capa.org Tue Jul 15 20:19:00 2003 From: lon-capa-cvs@mail.lon-capa.org (matthew) Date: Tue, 15 Jul 2003 19:19:00 -0000 Subject: [LON-CAPA-cvs] cvs: loncom / development_domain.tab Message-ID: matthew Tue Jul 15 15:19:00 2003 EDT Modified files: /loncom development_domain.tab Log: Added kerberos stuff to msu to fix "bug" with londropadd.pm not picking up the kerberos authentication domain by default. Index: loncom/development_domain.tab diff -u loncom/development_domain.tab:1.1 loncom/development_domain.tab:1.2 --- loncom/development_domain.tab:1.1 Thu Mar 27 16:35:41 2003 +++ loncom/development_domain.tab Tue Jul 15 15:19:00 2003 @@ -1,6 +1,8 @@ fsu:Florida State University 103:Room 103 -msu:Michigan State University +msu:Michigan State University:krb4:MSU.EDU + + physnet:CBI gerd:Gerd Office annarbor:Guy at Home From lon-capa-cvs@mail.lon-capa.org Tue Jul 15 20:23:14 2003 From: lon-capa-cvs@mail.lon-capa.org (matthew) Date: Tue, 15 Jul 2003 19:23:14 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /interface londropadd.pm Message-ID: matthew Tue Jul 15 15:23:14 2003 EDT Modified files: /loncom/interface londropadd.pm Log: &print_single_student_enroll_form(): Fix bug where londropadd.pm was not picking up the proper kerberos domain. Modified formatting of authentication table. Index: loncom/interface/londropadd.pm diff -u loncom/interface/londropadd.pm:1.74 loncom/interface/londropadd.pm:1.75 --- loncom/interface/londropadd.pm:1.74 Mon Jul 14 11:25:59 2003 +++ loncom/interface/londropadd.pm Tue Jul 15 15:23:14 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to drop and add students in courses # -# $Id: londropadd.pm,v 1.74 2003/07/14 15:25:59 matthew Exp $ +# $Id: londropadd.pm,v 1.75 2003/07/15 19:23:14 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -753,7 +753,7 @@ my $defdom=$r->dir_config('lonDefDomain'); # Set up authentication forms my ($krbdef,$krbdefdom) = - &Apache::loncommon::get_kerberos_defaults($defdom); + &Apache::loncommon::get_kerberos_defaults($domain); $javascript_validations=&javascript_validations($krbdefdom); my %param = ( formname => 'document.studentform', kerb_def_dom => $krbdefdom, @@ -794,9 +794,9 @@
$krbform -
+
$intform -
+
$locform
END From lon-capa-cvs@mail.lon-capa.org Tue Jul 15 20:25:45 2003 From: lon-capa-cvs@mail.lon-capa.org (bowersj2) Date: Tue, 15 Jul 2003 19:25:45 -0000 Subject: [LON-CAPA-cvs] cvs: doc /loncapafiles loncapafiles.lpml Message-ID: bowersj2 Tue Jul 15 15:25:45 2003 EDT Modified files: /doc/loncapafiles loncapafiles.lpml Log: Add new .tex files to the install. Index: doc/loncapafiles/loncapafiles.lpml diff -u doc/loncapafiles/loncapafiles.lpml:1.263 doc/loncapafiles/loncapafiles.lpml:1.264 --- doc/loncapafiles/loncapafiles.lpml:1.263 Wed Jul 9 06:05:15 2003 +++ doc/loncapafiles/loncapafiles.lpml Tue Jul 15 15:25:45 2003 @@ -2,7 +2,7 @@ "http://lpml.sourceforge.net/DTD/lpml.dtd"> - + - + For students who has: '. + $result.=''."\n". + ($saveSub eq 'all' ? 'checked' : '').' /> everybody'."\n"; - ''."\n"; + $result.='

'. + ' '.'One or more students for current resource'. + '
-->For students who has: '. ' submitted'. ' everybody
'. - ' '. - 'Upload scores from file

'. + ''. + '
'."\n"; + + $result.=''; + + $result.=''; + $result.=''."\n"; $result.=''."\n"; + ' scantron forms'."\n"; if ((&Apache::lonnet::allowed('mgr',$ENV{'request.course.id'})) && ($symb)) { $result.=''. - ''."\n"; } - $result.=''; - - $result.='
'. + ''. + ' scores from file
'. - ' '. - 'Grade scantron forms
'. - ' '. - 'Verify a submission receipt issued by this server --> Receipt no: '.unpack("%32C*",$Apache::lonnet::perlvar{'lonHostID'}). + ''. + ' submission Receipt no: '.unpack("%32C*",$Apache::lonnet::perlvar{'lonHostID'}). '-'. '

'."\n". - ' Select section: '; - - $result.='Student Status:'.&Apache::lonhtmlcommon::StatusOptions($saveStatus,undef,1,undef); - $result.=' (Applies to the first three options only.)'."\n"; - - if (ref($sections)) { - $result.=' (Section "no" implies the students were not assigned a section.)
' - if (grep /no/,@$sections); - } - $result.='

'. - ''."\n". - '
'."\n". + $result.=''."\n". ''."\n". ''."\n"; return $result; --ng1058302793-- From lon-capa-cvs@mail.lon-capa.org Tue Jul 15 22:12:01 2003 From: lon-capa-cvs@mail.lon-capa.org (www) Date: Tue, 15 Jul 2003 21:12:01 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /homework inputtags.pm /interface lonparmset.pm Message-ID: www Tue Jul 15 17:12:01 2003 EDT Modified files: /loncom/homework inputtags.pm /loncom/interface lonparmset.pm Log: Bug #1942: being able to disable receipt display. Index: loncom/homework/inputtags.pm diff -u loncom/homework/inputtags.pm:1.107 loncom/homework/inputtags.pm:1.108 --- loncom/homework/inputtags.pm:1.107 Tue Jun 24 15:18:01 2003 +++ loncom/homework/inputtags.pm Tue Jul 15 17:12:01 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # input definitons # -# $Id: inputtags.pm,v 1.107 2003/06/24 19:18:01 albertel Exp $ +# $Id: inputtags.pm,v 1.108 2003/07/15 21:12:01 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -343,7 +343,11 @@ } else { $message = "You are correct."; } - $message.=' Your receipt is '.&Apache::lonnet::receipt; + unless ($ENV{'course.'. + $ENV{'request.course.id'}. + '.disable_receipt_display'} eq 'yes') { + $message.='
Your receipt is '.&Apache::lonnet::receipt; + } } $bgcolor=$possiblecolors{'correct'}; $button=0; @@ -359,8 +363,12 @@ $bgcolor=$possiblecolors{'charged_try'}; $button=1; } else { - $message = "You are correct. Your receipt is ". - &Apache::lonnet::receipt; + $message = "You are correct."; + unless ($ENV{'course.'. + $ENV{'request.course.id'}. + '.disable_receipt_display'} eq 'yes') { + $message.='
Your receipt is '.&Apache::lonnet::receipt; + } $bgcolor=$possiblecolors{'correct'}; $button=0; $previousmsg=''; Index: loncom/interface/lonparmset.pm diff -u loncom/interface/lonparmset.pm:1.114 loncom/interface/lonparmset.pm:1.115 --- loncom/interface/lonparmset.pm:1.114 Thu Jul 10 02:16:29 2003 +++ loncom/interface/lonparmset.pm Tue Jul 15 17:12:01 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.114 2003/07/10 06:16:29 www Exp $ +# $Id: lonparmset.pm,v 1.115 2003/07/15 21:12:01 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1529,7 +1529,7 @@ 'have different numbers and answers', 'problem_stream_switch' => 'Allow problems to be split over pages
'. - ' ("yes" if allowed, anything else if not)',, + ' ("yes" if allowed, anything else if not)', 'anonymous_quiz' => 'Anonimous quiz/exam
'. ' (yes to avoid print students names )', @@ -1537,7 +1537,10 @@ 'when enrolling students', 'default_enrollment_end_date' => 'Default ending date '. 'when enrolling students', - 'languages' => 'Languages used' + 'languages' => 'Languages used', + 'disable_receipt_display' + => 'Disable display of problem receipts
'. + ' ("yes" to disable, anything else if not)' ); my @Display_Order = ('url','description','courseid', 'default_xml_style','pageseparators', @@ -1547,6 +1550,7 @@ 'languages', 'rndseed', 'problem_stream_switch', + 'disable_receipt_display', 'spreadsheet_default_classcalc', 'spreadsheet_default_studentcalc', 'spreadsheet_default_assesscalc', From lon-capa-cvs@mail.lon-capa.org Tue Jul 15 22:26:23 2003 From: lon-capa-cvs@mail.lon-capa.org (www) Date: Tue, 15 Jul 2003 21:26:23 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /homework inputtags.pm /html/adm/help/tex Receipt.tex doc/loncapafiles loncapafiles.lpml Message-ID: www Tue Jul 15 17:26:23 2003 EDT Added files: /loncom/html/adm/help/tex Receipt.tex Modified files: /doc/loncapafiles loncapafiles.lpml /loncom/homework inputtags.pm Log: Help on Receipts Index: doc/loncapafiles/loncapafiles.lpml diff -u doc/loncapafiles/loncapafiles.lpml:1.265 doc/loncapafiles/loncapafiles.lpml:1.266 --- doc/loncapafiles/loncapafiles.lpml:1.265 Tue Jul 15 16:02:02 2003 +++ doc/loncapafiles/loncapafiles.lpml Tue Jul 15 17:26:23 2003 @@ -2,7 +2,7 @@ "http://lpml.sourceforge.net/DTD/lpml.dtd"> - + - + For students with '. + ' submissions or '. + ' for all'."\n"; $result.=''. ' '. - 'All students in section/course for current resource'."\n"; + 'Current Resource: For all students in selected section or course'."\n"; - $result.=''. - ' '.'One or more students for current resource'. - '
-->For students who has: '. - ' submitted'. - ' everybody'."\n"; + $result.=''. + ' '. + 'The complete set/page/sequence: For one student'."\n"; $result.='
'. ''. --ng1058479705-- From lon-capa-cvs@mail.lon-capa.org Fri Jul 18 14:45:14 2003 From: lon-capa-cvs@mail.lon-capa.org (www) Date: Fri, 18 Jul 2003 13:45:14 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm Message-ID: www Fri Jul 18 09:45:14 2003 EDT Modified files: /loncom/interface loncreateuser.pm Log: Toward bug #795 Index: loncom/interface/loncreateuser.pm diff -u loncom/interface/loncreateuser.pm:1.59 loncom/interface/loncreateuser.pm:1.60 --- loncom/interface/loncreateuser.pm:1.59 Thu Jul 17 15:40:39 2003 +++ loncom/interface/loncreateuser.pm Fri Jul 18 09:45:14 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.59 2003/07/17 19:40:39 www Exp $ +# $Id: loncreateuser.pm,v 1.60 2003/07/18 13:45:14 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -46,7 +46,7 @@ # 05/10,10/16 Gerd Kortemeyer # 02/11/02 Matthew Hall # -# $Id: loncreateuser.pm,v 1.59 2003/07/17 19:40:39 www Exp $ +# $Id: loncreateuser.pm,v 1.60 2003/07/18 13:45:14 www Exp $ ### package Apache::loncreateuser; @@ -264,7 +264,7 @@ $dochead

Change User Privileges

$forminfo -

User "$ccuname" in domain $ccdomain

User "$ccuname" in domain "$ccdomain"

ENDCHANGEUSER # Get the users information my %userenv = &Apache::lonnet::get('environment', @@ -875,6 +875,7 @@ 'Create Users, Change User Privileges').'

'); my ($rdummy,$roledef)= &Apache::lonnet::get('roles',["rolesdef_$rolename"]); +# ------------------------------------------------------- Does this role exist? if (($rdummy ne 'con_lost') && ($roledef ne '')) { $r->print('Existing Role "'); } else { @@ -882,6 +883,28 @@ $roledef=''; } $r->print($rolename.'"

'); +# ------------------------------------------------------- What can be assigned? + my %full=(); + my %courselevel=(); + foreach (split(/\:/,$Apache::lonnet::pr{'cr:c'})) { + my ($priv,$restrict)=split(/\&/,$_); + unless ($restrict) { $restrict='F'; } + $courselevel{$priv}=$restrict; + $full{$priv}=1; + } + my %domainlevel=(); + foreach (split(/\:/,$Apache::lonnet::pr{'cr:d'})) { + my ($priv,$restrict)=split(/\&/,$_); + unless ($restrict) { $restrict='F'; } + $domainlevel{$priv}=$restrict; + $full{$priv}=1; + } + $r->print(''); + foreach (sort keys %full) { + $r->print(''); + } + $r->print('

Privilege	Course Level	Domain Level
'.&Apache::lonnet::plaintext($_).'	'. + $courselevel{$_}.'	'.$domainlevel{$_}.'

'); $r->print('Not yet implemented.'); } From lon-capa-cvs@mail.lon-capa.org Fri Jul 18 15:18:55 2003 From: lon-capa-cvs@mail.lon-capa.org (bowersj2) Date: Fri, 18 Jul 2003 14:18:55 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /html/adm/help/tex Docs_Load_Map.tex Message-ID: bowersj2 Fri Jul 18 10:18:55 2003 EDT Added files: /loncom/html/adm/help/tex Docs_Load_Map.tex Log: New help file for the Docs screen. Index: loncom/html/adm/help/tex/Docs_Load_Map.tex +++ loncom/html/adm/help/tex/Docs_Load_Map.tex \label{Docs_Load_Map} You can load all the resources from an existing LON-CAPA sequence into the current folder in your \textbf{Course Documents} area. This allows you to easily load up a folder with existing resources, and subsequently manipulate the folder, such as by deleting or reordering the resources. Note that if you have no intention of changing the order, it's easier just to directly load the sequence using the \textbf{Import} button. Load a map's resources into the current folder by doing the following: \begin{itemize} \item Click \textbf{Select Map} next to the text entry area under the \textbf{Import a published document} area on the \textbf{Course Documents} screen. \item Navigate to the desired sequence, and click the \textbf{Select} button next to it. \item Click the \textbf{Load Map} button. The map will be loaded into your \textbf{Course Documents}. \end{itemize} From lon-capa-cvs@mail.lon-capa.org Fri Jul 18 15:20:09 2003 From: lon-capa-cvs@mail.lon-capa.org (bowersj2) Date: Fri, 18 Jul 2003 14:20:09 -0000 Subject: [LON-CAPA-cvs] cvs: doc /loncapafiles loncapafiles.lpml Message-ID: bowersj2 Fri Jul 18 10:20:09 2003 EDT Modified files: /doc/loncapafiles loncapafiles.lpml Log: Load Docs_Load_Map.tex into install. Index: doc/loncapafiles/loncapafiles.lpml diff -u doc/loncapafiles/loncapafiles.lpml:1.267 doc/loncapafiles/loncapafiles.lpml:1.268 --- doc/loncapafiles/loncapafiles.lpml:1.267 Wed Jul 16 15:36:02 2003 +++ doc/loncapafiles/loncapafiles.lpml Fri Jul 18 10:20:09 2003 @@ -2,7 +2,7 @@ "http://lpml.sourceforge.net/DTD/lpml.dtd"> - + 璹綷穝糤呼1 穝糤呼1 窾禪褐100



璹綷 --=_NextPart_2rfkindysadvnqw3nerasdf-- From lon-capa-cvs@mail.lon-capa.org Fri Jul 18 20:50:28 2003 From: lon-capa-cvs@mail.lon-capa.org (www) Date: Fri, 18 Jul 2003 19:50:28 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm /lonnet/perl lonnet.pm Message-ID: This is a MIME encoded message --www1058557828 Content-Type: text/plain www Fri Jul 18 15:50:28 2003 EDT Modified files: /loncom/interface loncreateuser.pm /loncom/lonnet/perl lonnet.pm Log: Work on bug #795 --www1058557828 Content-Type: text/plain Content-Disposition: attachment; filename="www-20030718155028.txt" Index: loncom/interface/loncreateuser.pm diff -u loncom/interface/loncreateuser.pm:1.60 loncom/interface/loncreateuser.pm:1.61 --- loncom/interface/loncreateuser.pm:1.60 Fri Jul 18 09:45:14 2003 +++ loncom/interface/loncreateuser.pm Fri Jul 18 15:50:28 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.60 2003/07/18 13:45:14 www Exp $ +# $Id: loncreateuser.pm,v 1.61 2003/07/18 19:50:28 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -25,28 +25,6 @@ # # http://www.lon-capa.org/ # -# (Create a course -# (My Desk -# -# (Internal Server Error Handler -# -# (Login Screen -# 5/21/99,5/22,5/25,5/26,5/31,6/2,6/10,7/12,7/14, -# 1/14/00,5/29,5/30,6/1,6/29,7/1,11/9 Gerd Kortemeyer) -# -# YEAR=2001 -# 3/1/1 Gerd Kortemeyer) -# -# 3/1 Gerd Kortemeyer) -# -# 2/14 Gerd Kortemeyer) -# -# 2/14,2/17,2/19,2/20,2/21,2/22,2/23,3/2,3/17,3/24,04/12 Gerd Kortemeyer -# April Guy Albertelli -# 05/10,10/16 Gerd Kortemeyer -# 02/11/02 Matthew Hall -# -# $Id: loncreateuser.pm,v 1.60 2003/07/18 13:45:14 www Exp $ ### package Apache::loncreateuser; @@ -90,7 +68,7 @@ my %rolehash=&Apache::lonnet::dump('roles'); foreach (keys %rolehash) { if ($_=~/^rolesdef\_(\w+)$/) { - $returnhash{$_}=$_; + $returnhash{$1}=$1; } } return %returnhash; @@ -873,11 +851,17 @@ $r->print(&Apache::loncommon::bodytag( 'Create Users, Change User Privileges').'

'); + my $syspriv=''; + my $dompriv=''; + my $coursepriv=''; my ($rdummy,$roledef)= &Apache::lonnet::get('roles',["rolesdef_$rolename"]); # ------------------------------------------------------- Does this role exist? if (($rdummy ne 'con_lost') && ($roledef ne '')) { $r->print('Existing Role "'); +# ------------------------------------------------- Get current role privileges + ($syspriv,$dompriv,$coursepriv)=split(/\_/,$roledef); + $r->print($syspriv.' '.$dompriv.' '.$coursepriv); } else { $r->print('New Role "'); $roledef=''; @@ -886,26 +870,118 @@ # ------------------------------------------------------- What can be assigned? my %full=(); my %courselevel=(); + my %courselevelcurrent=(); foreach (split(/\:/,$Apache::lonnet::pr{'cr:c'})) { my ($priv,$restrict)=split(/\&/,$_); unless ($restrict) { $restrict='F'; } $courselevel{$priv}=$restrict; + if ($coursepriv=~/\:$priv/) { + $courselevelcurrent{$priv}=1; + } $full{$priv}=1; } my %domainlevel=(); + my %domainlevelcurrent=(); foreach (split(/\:/,$Apache::lonnet::pr{'cr:d'})) { my ($priv,$restrict)=split(/\&/,$_); unless ($restrict) { $restrict='F'; } $domainlevel{$priv}=$restrict; + if ($dompriv=~/\:$priv/) { + $domainlevelcurrent{$priv}=1; + } $full{$priv}=1; } - $r->print(''); + my %systemlevel=(); + my %systemlevelcurrent=(); + foreach (split(/\:/,$Apache::lonnet::pr{'cr:s'})) { + my ($priv,$restrict)=split(/\&/,$_); + unless ($restrict) { $restrict='F'; } + $systemlevel{$priv}=$restrict; + if ($syspriv=~/\:$priv/) { + $systemlevelcurrent{$priv}=1; + } + $full{$priv}=1; + } + $r->print(< + + +
Privilege Course Level Domain Level
+ + +ENDCCF foreach (sort keys %full) { $r->print(''); + ($courselevel{$_}?'':' '). + ''); } - $r->print('
Privilege Course Level Domain Level System Level
'.&Apache::lonnet::plaintext($_).' '. - $courselevel{$_}.' '.$domainlevel{$_}.'
'. + ($domainlevel{$_}?'':' '). + ' '. + ($systemlevel{$_}?'':' '). + '
'); - $r->print('Not yet implemented.'); + $r->print( + ''); +} + +# ---------------------------------------------------------- Call to definerole +sub set_custom_role { + my $r=shift; + + my $rolename=$ENV{'form.rolename'}; + + $rolename=~s/\W//gs; + + unless ($rolename) { + &print_username_entry_form($r); + return; + } + + $r->print(&Apache::loncommon::bodytag( + 'Create Users, Change User Privileges').'
'); + my ($rdummy,$roledef)= + &Apache::lonnet::get('roles',["rolesdef_$rolename"]); +# ------------------------------------------------------- Does this role exist? + if (($rdummy ne 'con_lost') && ($roledef ne '')) { + $r->print('Existing Role "'); + } else { + $r->print('New Role "'); + $roledef=''; + } + $r->print($rolename.'"
'); +# ------------------------------------------------------- What can be assigned? + my $sysrole=''; + my $domrole=''; + my $courole=''; + + foreach (split(/\:/,$Apache::lonnet::pr{'cr:c'})) { + my ($priv,$restrict)=split(/\&/,$_); + unless ($restrict) { $restrict=''; } + if ($ENV{'form.'.$priv.':c'}) { + $courole.=':'.$_; + } + } + + foreach (split(/\:/,$Apache::lonnet::pr{'cr:d'})) { + my ($priv,$restrict)=split(/\&/,$_); + unless ($restrict) { $restrict=''; } + if ($ENV{'form.'.$priv.':d'}) { + $domrole.=':'.$_; + } + } + + foreach (split(/\:/,$Apache::lonnet::pr{'cr:s'})) { + my ($priv,$restrict)=split(/\&/,$_); + unless ($restrict) { $restrict=''; } + if ($ENV{'form.'.$priv.':s'}) { + $sysrole.=':'.$_; + } + } + $r->print('Defining Role: '. + &Apache::lonnet::definerole($rolename,$sysrole,$domrole,$courole)); + $r->print(''); } # ================================================================ Main Handler @@ -935,6 +1011,8 @@ &update_user_data($r); } elsif ($ENV{'form.phase'} eq 'selected_custom_edit') { &custom_role_editor($r); + } elsif ($ENV{'form.phase'} eq 'set_custom_roles') { + &set_custom_role($r); } } else { $ENV{'user.error.msg'}= Index: loncom/lonnet/perl/lonnet.pm diff -u loncom/lonnet/perl/lonnet.pm:1.391 loncom/lonnet/perl/lonnet.pm:1.392 --- loncom/lonnet/perl/lonnet.pm:1.391 Wed Jul 16 16:13:17 2003 +++ loncom/lonnet/perl/lonnet.pm Fri Jul 18 15:50:28 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.391 2003/07/16 20:13:17 matthew Exp $ +# $Id: lonnet.pm,v 1.392 2003/07/18 19:50:28 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1936,14 +1936,14 @@ my ($tdummy,$tdomain,$trest)=split(/\//,$area); if ($trole =~ /^cr\//) { my ($rdummy,$rdomain,$rauthor,$rrole)=split(/\//,$trole); - my $homsvr=homeserver($rauthor,$rdomain); + my $homsvr=homeserver($rauthor,$rdomain); if ($hostname{$homsvr} ne '') { - my $roledef= - reply("get:$rdomain:$rauthor:roles:rolesdef_$rrole", - $homsvr); - if (($roledef ne 'con_lost') && ($roledef ne '')) { + my ($rdummy,$roledef)= + &get('roles',["rolesdef_$rrole"],$rdomain,$rauthor); + + if (($rdummy ne 'con_lost') && ($roledef ne '')) { my ($syspriv,$dompriv,$coursepriv)= - split(/\_/,unescape($roledef)); + split(/\_/,$roledef); if (defined($syspriv)) { $allroles{'cm./'}.=':'.$syspriv; $allroles{$spec.'./'}.=':'.$syspriv; @@ -2521,7 +2521,7 @@ sub definerole { if (allowed('mcr','/')) { my ($rolename,$sysrole,$domrole,$courole)=@_; - foreach (split('/',$sysrole)) { + foreach (split(':',$sysrole)) { my ($crole,$cqual)=split(/\&/,$_); if ($pr{'cr:s'}!~/$crole/) { return "refused:s:$crole"; } if ($pr{'cr:s'}=~/$crole\&/) { @@ -2530,7 +2530,7 @@ } } } - foreach (split('/',$domrole)) { + foreach (split(':',$domrole)) { my ($crole,$cqual)=split(/\&/,$_); if ($pr{'cr:d'}!~/$crole/) { return "refused:d:$crole"; } if ($pr{'cr:d'}=~/$crole\&/) { @@ -2539,7 +2539,7 @@ } } } - foreach (split('/',$courole)) { + foreach (split(':',$courole)) { my ($crole,$cqual)=split(/\&/,$_); if ($pr{'cr:c'}!~/$crole/) { return "refused:c:$crole"; } if ($pr{'cr:c'}=~/$crole\&/) { --www1058557828-- From lon-capa-cvs@mail.lon-capa.org Fri Jul 18 21:14:35 2003 From: lon-capa-cvs@mail.lon-capa.org (ng) Date: Fri, 18 Jul 2003 20:14:35 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /homework grades.pm Message-ID: This is a MIME encoded message --ng1058559275 Content-Type: text/plain ng Fri Jul 18 16:14:35 2003 EDT Modified files: /loncom/homework grades.pm Log: clean up some more codes fix a couple of bugs --ng1058559275 Content-Type: text/plain Content-Disposition: attachment; filename="ng-20030718161435.txt" Index: loncom/homework/grades.pm diff -u loncom/homework/grades.pm:1.118 loncom/homework/grades.pm:1.119 --- loncom/homework/grades.pm:1.118 Thu Jul 17 18:08:25 2003 +++ loncom/homework/grades.pm Fri Jul 18 16:14:35 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.118 2003/07/17 22:08:25 ng Exp $ +# $Id: grades.pm,v 1.119 2003/07/18 20:14:35 ng Exp $ # # Copyright Michigan State University Board of Trustees # @@ -140,7 +140,6 @@ #--- Currently filters option response type only. sub cleanRecord { my ($answer,$response) = @_; - $answer =~ s|^
||; if ($response eq 'option') { my (@IDs,@ans); foreach (split(/\&/,&Apache::lonnet::unescape($answer))) { @@ -471,8 +470,7 @@ $request->print($result); my $checkhdgrade = ($ENV{'form.handgrade'} eq 'yes' && scalar(@$partlist) > 1 ) ? 'checked' : ''; - my $checklastsub = ($ENV{'form.handgrade'} eq 'no') ? 'checked' : ''; - $checklastsub = 'checked' if ($checkhdgrade eq '' && $checklastsub eq ''); + my $checklastsub = $checkhdgrade eq '' ? 'checked' : ''; my $gradeTable='
'."\n". ' View Problem Text: no '."\n". ' one student '."\n". @@ -1033,16 +1031,6 @@ hDoc.write(" self.close()"); hDoc.write("}"); -/* hDoc.write("function radioSelection(radioButton) {"); - hDoc.write(" var selection=null;"); - hDoc.write(" for (var i=0; i"); @@ -1233,6 +1221,7 @@ $request->print(''."\n". ''."\n". ''."\n". + ''."\n". ''."\n". ''."\n". ''."\n". @@ -1377,8 +1366,7 @@ $$fullname{$ENV{'form.'.$uname.':'.$udom.':submitted_by'}}.''; $request->print($submitby); } else { - my ($string,$timestamp)= - &get_last_submission (%record); + my ($string,$timestamp)= &get_last_submission (\%record); my $lastsubonly=''. ($$timestamp eq '' ? '' : 'Date Submitted: '. $$timestamp)."\n"; @@ -1416,9 +1404,11 @@ '"> File uploaded by student '. 'Like all files provided by users, '. 'this file may contain virusses
':''). - 'Submitted Answer: '.($responsetype eq 'essay' ? '
' : ''). + 'Submitted Answer: '.($responsetype =~ /^(essay|option)$/ ? + '
' : ''). &cleanRecord(&keywords_highlight($subval),$responsetype). - ($responsetype eq 'essay' ? '

' : '

').$similar."\n" + ($responsetype =~ /^(essay|option)$/ ? '

' : + '

').$similar."\n" if ($ENV{'form.lastSub'} eq 'lastonly' || ($ENV{'form.lastSub'} eq 'hdgrade' && $$handgrade{$part} =~ /:yes$/)); @@ -1439,7 +1429,6 @@ # return if view submission with no grading option if ($ENV{'form.showgrading'} eq '' || (!&canmodify($usec))) { -# if (!&canmodify($usec)) { $request->print('
'."\n"); $request->print(&show_grading_menu_form($symb,$url)) if (($ENV{'form.command'} eq 'submission') || @@ -1447,12 +1436,12 @@ return; } + $result=''."\n". + ''."\n". + ''."\n"; # essay grading options if ($ENV{'form.handgrade'} eq 'yes') { - $result=''."\n". - ''."\n". - ''."\n"; my ($lastname,$givenn) = split(/,/,$ENV{'form.fullname'}); my $msgfor = $givenn.' '.$lastname; if (scalar(@col_fullnames) > 0) { @@ -1468,8 +1457,8 @@ '/mailbkgrd.gif" width="14" height="10" name="mailicon'.$counter.'" />'."\n". '
(Message will be sent when you click on Save & Next below.)'."\n" if ($ENV{'form.handgrade'} eq 'yes'); - $request->print($result); } + $request->print($result); my %seen = (); my @partlist; @@ -1496,26 +1485,21 @@ if ($counter == $total) { my $endform='
'. ''."\n"; -# if ($ENV{'form.handgrade'} eq 'yes') { - $endform.=' '."\n"; - my $ntstu =''."\n"; - my $nsel = ($ENV{'form.NTSTU'} ne '' ? $ENV{'form.NTSTU'} : '1'); - $ntstu =~ s/
'; $endform.=&show_grading_menu_form($symb,$url); $request->print($endform); @@ -1525,15 +1509,15 @@ #--- Retrieve the last submission for all the parts sub get_last_submission { - my (%returnhash)=@_; + my ($returnhash)=@_; my (@string,$timestamp); - if ($returnhash{'version'}) { + if ($$returnhash{'version'}) { my %lasthash=(); my ($version); - for ($version=1;$version<=$returnhash{'version'};$version++) { - foreach (sort(split(/\:/,$returnhash{$version.':keys'}))) { - $lasthash{$_}=$returnhash{$version.':'.$_}; - $timestamp = scalar(localtime($returnhash{$version.':timestamp'})); + for ($version=1;$version<=$$returnhash{'version'};$version++) { + foreach (sort(split(/\:/,$$returnhash{$version.':keys'}))) { + $lasthash{$_}=$$returnhash{$version.':'.$_}; + $timestamp = scalar(localtime($$returnhash{$version.':timestamp'})); } } foreach ((keys %lasthash)) { @@ -1557,13 +1541,8 @@ (my $styleoff = $styleon) =~ s/\$styleon$_$styleoff\<\/font\>/gi; + $string =~ s/\b\Q$_\E(\b|\.)/$styleon$_$styleoff<\/font>/gi; } - # This is not really the right place to do this, but I cannot find a - # better one at this time. So here we go - the m in the s:::mg causes - # ^ to match the beginning of a new line. So we replace(???) the beginning - # of the line with
to make things formatted a little better. - $string =~ s:^:
:mg; return $string; } @@ -1609,7 +1588,8 @@ if ($ENV{'form.collaborator'.$ctr}) { my (@collaborators) = split(/:/,$ENV{'form.collaborator'.$ctr}); foreach (@collaborators) { - my ($errorflag,$pts,$wgt) = &saveHandGrade($request,$url,$symb,$_,$udom,$ctr,$ENV{'form.unamedom'.$ctr}); + my ($errorflag,$pts,$wgt) = + &saveHandGrade($request,$url,$symb,$_,$udom,$ctr,$ENV{'form.unamedom'.$ctr}); if ($errorflag eq 'not_allowed') { $request->print("Not allowed to modify grades for $_:$udom"); next; @@ -1626,48 +1606,50 @@ } } - # Keywords sorted in alphabatical order - my $loginuser = $ENV{'user.name'}.':'.$ENV{'user.domain'}; - my %keyhash = (); - $ENV{'form.keywords'} =~ s/,\s{0,}|\s+/ /g; - $ENV{'form.keywords'} =~ s/^\s+|\s+$//; - my (@keywords) = sort(split(/\s+/,$ENV{'form.keywords'})); - $ENV{'form.keywords'} = join(' ',@keywords); - $keyhash{$symb.'_keywords'} = $ENV{'form.keywords'}; - $keyhash{$symb.'_subject'} = $ENV{'form.msgsub'}; - $keyhash{$loginuser.'_kwclr'} = $ENV{'form.kwclr'}; - $keyhash{$loginuser.'_kwsize'} = $ENV{'form.kwsize'}; - $keyhash{$loginuser.'_kwstyle'} = $ENV{'form.kwstyle'}; - - # message center - Order of message gets changed. Blank line is eliminated. - # New messages are saved in ENV for the next student. - # All messages are saved in nohist_handgrade.db - my ($ctr,$idx) = (1,1); - while ($ctr <= $ENV{'form.savemsgN'}) { - if ($ENV{'form.savemsg'.$ctr} ne '') { - $keyhash{$symb.'_savemsg'.$idx} = $ENV{'form.savemsg'.$ctr}; - $idx++; + if ($ENV{'form.handgrade'} eq 'yes') { + # Keywords sorted in alphabatical order + my $loginuser = $ENV{'user.name'}.':'.$ENV{'user.domain'}; + my %keyhash = (); + $ENV{'form.keywords'} =~ s/,\s{0,}|\s+/ /g; + $ENV{'form.keywords'} =~ s/^\s+|\s+$//; + my (@keywords) = sort(split(/\s+/,$ENV{'form.keywords'})); + $ENV{'form.keywords'} = join(' ',@keywords); + $keyhash{$symb.'_keywords'} = $ENV{'form.keywords'}; + $keyhash{$symb.'_subject'} = $ENV{'form.msgsub'}; + $keyhash{$loginuser.'_kwclr'} = $ENV{'form.kwclr'}; + $keyhash{$loginuser.'_kwsize'} = $ENV{'form.kwsize'}; + $keyhash{$loginuser.'_kwstyle'} = $ENV{'form.kwstyle'}; + + # message center - Order of message gets changed. Blank line is eliminated. + # New messages are saved in ENV for the next student. + # All messages are saved in nohist_handgrade.db + my ($ctr,$idx) = (1,1); + while ($ctr <= $ENV{'form.savemsgN'}) { + if ($ENV{'form.savemsg'.$ctr} ne '') { + $keyhash{$symb.'_savemsg'.$idx} = $ENV{'form.savemsg'.$ctr}; + $idx++; + } + $ctr++; } - $ctr++; - } - $ctr = 0; - while ($ctr < $ngrade) { - if ($ENV{'form.newmsg'.$ctr} ne '') { - $keyhash{$symb.'_savemsg'.$idx} = $ENV{'form.newmsg'.$ctr}; - $ENV{'form.savemsg'.$idx} = $ENV{'form.newmsg'.$ctr}; - $idx++; + $ctr = 0; + while ($ctr < $ngrade) { + if ($ENV{'form.newmsg'.$ctr} ne '') { + $keyhash{$symb.'_savemsg'.$idx} = $ENV{'form.newmsg'.$ctr}; + $ENV{'form.savemsg'.$idx} = $ENV{'form.newmsg'.$ctr}; + $idx++; + } + $ctr++; } - $ctr++; + $ENV{'form.savemsgN'} = --$idx; + $keyhash{$symb.'_savemsgN'} = $ENV{'form.savemsgN'}; + my $putresult = &Apache::lonnet::put + ('nohist_handgrade',\%keyhash, + $ENV{'course.'.$ENV{'request.course.id'}.'.domain'}, + $ENV{'course.'.$ENV{'request.course.id'}.'.num'}); } - $ENV{'form.savemsgN'} = --$idx; - $keyhash{$symb.'_savemsgN'} = $ENV{'form.savemsgN'}; - my $putresult = &Apache::lonnet::put - ('nohist_handgrade',\%keyhash, - $ENV{'course.'.$ENV{'request.course.id'}.'.domain'}, - $ENV{'course.'.$ENV{'request.course.id'}.'.num'}); - # Called by Save & Refresh from Highlight Attribute Window - my (undef,undef,$fullname) = &getclasslist($ENV{'form.section'},'0'); +# my (undef,undef,$fullname) = &getclasslist($ENV{'form.section'},'0'); + my (undef,undef,$fullname) = &getclasslist($ENV{'form.section'},'1'); if ($ENV{'form.refresh'} eq 'on') { my ($ctr,$total) = (0,0); while ($ctr < $ngrade) { @@ -1689,7 +1671,7 @@ # Get the next/previous one or group of students my $firststu = $ENV{'form.unamedom0'}; my $laststu = $ENV{'form.unamedom'.($ngrade-1)}; - $ctr = 2; + my $ctr = 2; while ($laststu eq '') { $laststu = $ENV{'form.unamedom'.($ngrade-$ctr)}; $ctr++; @@ -1773,6 +1755,7 @@ $wgt = $ENV{'form.WGT'.$newflg.'_'.$_} eq '' ? 1 : $ENV{'form.WGT'.$newflg.'_'.$_}; my $partial= $pts/$wgt; + next if ($partial eq $record{'resource.'.$_.'.awarded'}); #do not update score for part if not changed. $newrecord{'resource.'.$_.'.awarded'} = $partial if ($record{'resource.'.$_.'.awarded'} ne $partial); my $reckey = 'resource.'.$_.'.solved'; @@ -2047,8 +2030,6 @@ ''; $result.=''; -# $result.=' '."\n"; #table listing all the students in a section/class #header of table @@ -2824,45 +2805,11 @@ if ($record{'version'} eq '') { $studentTable.='
No recorded submission for this problem
'; } else { - $studentTable.='
'. - ''. - ''. - ''. - ''; my %responseType = (); foreach my $partid (@{$parts}) { $responseType{$partid} = $curRes->responseType($partid); } - my ($version); - my %mark; - $mark{'correct_by_student'} = $checkIcon; - for ($version=1;$version<=$record{'version'};$version++) { - my $timestamp = scalar(localtime($record{$version.':timestamp'})); - $studentTable.=''; - my @versionKeys = split(/\:/,$record{$version.':keys'}); - my @displaySub = (); - foreach my $partid (@{$parts}) { - my @matchKey = grep /^resource\.$partid\..?\.submission$/,@versionKeys; - next if ($record{"$version:resource.$partid.solved"} eq ''); - $displaySub[0].=(exists $record{$version.':'.$matchKey[0]}) ? - 'Part '.$partid.' '. - ($record{"$version:resource.$partid.tries"} eq '' ? 'Trial not counted' : - 'Trial '.$record{"$version:resource.$partid.tries"}).' '. - &cleanRecord($record{$version.':'.$matchKey[0]},$responseType{$partid}).'
' : ''; - $displaySub[1].=(exists $record{"$version:resource.$partid.award"}) ? - 'Part '.$partid.' '. - lc($record{"$version:resource.$partid.award"}).' '. - $mark{$record{"$version:resource.$partid.solved"}}.'
' : ''; -# $record{"$version:resource.$partid.solved"}.'
' : ''; - $displaySub[2].=(exists $record{"$version:resource.$partid.regrader"}) ? - $record{"$version:resource.$partid.regrader"}.' (Part: '.$partid.')' : ''; - } - $displaySub[2].=(exists $record{"$version:resource.regrader"}) ? - $record{"$version:resource.regrader"} : ''; - $studentTable.=''; - } - $studentTable.='
Date/Time Submission Status
'.$timestamp.' '.$displaySub[0].' '.$displaySub[1]. - ($displaySub[2] eq '' ? '' : 'Manually graded by '.$displaySub[2]).'
'; + $studentTable.= &displaySubByDates(\%record,$parts,\%responseType,$checkIcon); } } elsif ($ENV{'form.lastSub'} eq 'all') { my $last = ($ENV{'form.lastSub'} eq 'last' ? 'last' : ''); @@ -2894,6 +2841,46 @@ $request->print($studentTable); return ''; +} + +sub displaySubByDates { + my ($record,$parts,$responseType,$checkIcon) = @_; + my $studentTable='
'. + ''. + ''. + ''. + ''; + my ($version); + my %mark; + $mark{'correct_by_student'} = $checkIcon; + for ($version=1;$version<=$$record{'version'};$version++) { + my $timestamp = scalar(localtime($$record{$version.':timestamp'})); + $studentTable.=''; + my @versionKeys = split(/\:/,$$record{$version.':keys'}); + my @displaySub = (); + foreach my $partid (@{$parts}) { + my @matchKey = grep /^resource\.$partid\..?\.submission$/,@versionKeys; + next if ($$record{"$version:resource.$partid.solved"} eq ''); + $displaySub[0].=(exists $$record{$version.':'.$matchKey[0]}) ? + 'Part '.$partid.' '. + ($$record{"$version:resource.$partid.tries"} eq '' ? 'Trial not counted' : + 'Trial '.$$record{"$version:resource.$partid.tries"}).' '. + &cleanRecord($$record{$version.':'.$matchKey[0]},$$responseType{$partid}).'
' : ''; + $displaySub[1].=(exists $$record{"$version:resource.$partid.award"}) ? + 'Part '.$partid.' '. + lc($$record{"$version:resource.$partid.award"}).' '. + $mark{$$record{"$version:resource.$partid.solved"}}.'
' : ''; +# $$record{"$version:resource.$partid.solved"}.'
' : ''; + $displaySub[2].=(exists $$record{"$version:resource.$partid.regrader"}) ? + $$record{"$version:resource.$partid.regrader"}.' (Part: '.$partid.')' : ''; + } + $displaySub[2].=(exists $$record{"$version:resource.regrader"}) ? + $$record{"$version:resource.regrader"} : ''; + $studentTable.=''; + } + $studentTable.='
Date/Time Submission Status
'.$timestamp.' '.$displaySub[0].' '.$displaySub[1]. + ($displaySub[2] eq '' ? '' : 'Manually graded by '.$displaySub[2]).'
'; + return $studentTable; } sub updateGradeByPage { --ng1058559275-- From lon-capa-cvs@mail.lon-capa.org Fri Jul 18 21:42:27 2003 From: lon-capa-cvs@mail.lon-capa.org (bowersj2) Date: Fri, 18 Jul 2003 20:42:27 -0000 Subject: [LON-CAPA-cvs] cvs: doc /help texxml2latex.pl Message-ID: bowersj2 Fri Jul 18 16:42:27 2003 EDT Modified files: /doc/help texxml2latex.pl Log: Added ability to use the "pod" tag in a texxml file to tell the help system to grab stuff out of a perl module and format it as .tex. The good news is this is a good deal more powerful then I would have hoped; code to select various parts of the perldoc was already written; see "man Pod::Select". (Cool!) Also updated the formatting; this code is some of the first code I wrote and it did not conform to LON-CAPA style. Index: doc/help/texxml2latex.pl diff -u doc/help/texxml2latex.pl:1.4 doc/help/texxml2latex.pl:1.5 --- doc/help/texxml2latex.pl:1.4 Tue Jul 1 14:20:52 2003 +++ doc/help/texxml2latex.pl Fri Jul 18 16:42:27 2003 @@ -30,58 +30,75 @@ use strict; use HTML::TokeParser; use GDBM_File; +use File::Temp; # accept texxml document on standard in my $p = HTML::TokeParser->new( $ARGV[0] ); my $dirprefix = "../../loncom/html/adm/help/tex/"; +# Make myself a temp dir for processing POD +my $tmpdir = File::Temp::tempdir('loncapahelpgenXXXXXXX', TMPDIR => 1); + # Print the header open (LATEX_FILE, $dirprefix . "Latex_Header.tex"); print ; - while (my $token = $p->get_token()) { my $type = $token->[0]; - if ($type eq 'S') - { + if ($type eq 'S') { my $tag = $token->[1]; my $attr = $token->[2]; - if ($tag eq 'section') - { + if ($tag eq 'section') { my $title = $attr->{'name'}; print "\\section{$title}\n\n"; } - if ($tag eq 'subsection') - { + if ($tag eq 'subsection') { my $title = $attr->{'name'}; print "\\subsection{$title}\n\n"; } - if ($tag eq 'subsubsection') - { + if ($tag eq 'subsubsection') { my $title = $attr->{'name'}; print "\\subsubsection{$title}\n\n"; } - if ($tag eq 'file') - { + if ($tag eq 'file') { my $file = $attr->{'name'}; open (LATEX_FILE, $dirprefix . $file); print ; print "\n\n"; } - if ($tag eq 'tex') - { + if ($tag eq 'tex') { print "\n\n"; print $attr->{'content'}; print "\n\n"; } + + if ($tag eq 'pod') { + my $file = $attr->{'file'}; + my $section = $attr->{'section'}; + if (!defined($section)) { $section = ''; } + else { $section = "-section $section"; } + $file = '../../loncom/' . $file; + my $tempfile = 't' . substr($file, rindex($file, '/') + 1); + system ("cp $file $tmpdir"); + # The "echo" command is necessary; pod2latex can't + # handle a perl file that starts with pod. + system ("echo > $tmpdir/$tempfile; cat $file | podselect $section >> $tmpdir/$tempfile; cd $tmpdir; pod2latex $tempfile"); + my $latexFile = substr($tempfile, 0, rindex($tempfile, '.')) . '.tex'; + open LATEX_FILE, $tmpdir . '/' . $latexFile; + print ; + print "\n\n"; + } } } # Print out the footer. open (LATEX_FILE, $dirprefix . "Latex_Footer.tex"); print ; + +# Remove the temp directory +system ("rm -rf $tmpdir"); From lon-capa-cvs@mail.lon-capa.org Fri Jul 18 21:53:06 2003 From: lon-capa-cvs@mail.lon-capa.org (www) Date: Fri, 18 Jul 2003 20:53:06 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm Message-ID: www Fri Jul 18 16:53:06 2003 EDT Modified files: /loncom/interface loncreateuser.pm Log: Work on Bug #795 Index: loncom/interface/loncreateuser.pm diff -u loncom/interface/loncreateuser.pm:1.61 loncom/interface/loncreateuser.pm:1.62 --- loncom/interface/loncreateuser.pm:1.61 Fri Jul 18 15:50:28 2003 +++ loncom/interface/loncreateuser.pm Fri Jul 18 16:53:06 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.61 2003/07/18 19:50:28 www Exp $ +# $Id: loncreateuser.pm,v 1.62 2003/07/18 20:53:06 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -314,8 +314,8 @@ } # Compute the background color based on $area $bgcol=$1.'_'.$2; - $bgcol=~s/[^8-9b-e]//g; - $bgcol=substr($bgcol.$bgcol.$bgcol.'ffffff',0,6); + $bgcol=~s/[^7-9a-e]//g; + $bgcol=substr($bgcol.$bgcol.$bgcol.'ffffff',2,6); if ($area=~/^\/(\w+)\/(\d\w+)\/(\w+)/) { $carea.='
Section/Group: '.$3; } @@ -347,7 +347,7 @@ } } my $row = ''; - $row.=''; + $row.=''; my $active=1; $active=0 if (($role_end_time) && ($now>$role_end_time)); if (($active) && ($allowed)) { @@ -861,7 +861,6 @@ $r->print('Existing Role "'); # ------------------------------------------------- Get current role privileges ($syspriv,$dompriv,$coursepriv)=split(/\_/,$roledef); - $r->print($syspriv.' '.$dompriv.' '.$coursepriv); } else { $r->print('New Role "'); $roledef=''; @@ -1026,6 +1025,10 @@ sub course_level_table { my %inccourses = @_; my $table = ''; +# Custom Roles? + + my %customroles=&my_custom_roles(); + foreach (sort( keys(%inccourses))) { my $thiscourse=$_; my $protectedcourse=$_; @@ -1034,8 +1037,8 @@ my $area=$coursedata{'description'}; if (!defined($area)) { $area='Unavailable course: '.$_; } my $bgcol=$thiscourse; - $bgcol=~s/[^8-9b-e]//g; - $bgcol=substr($bgcol.$bgcol.$bgcol.'ffffff',0,6); + $bgcol=~s/[^7-9a-e]//g; + $bgcol=substr($bgcol.$bgcol.$bgcol.'ffffff',2,6); foreach ('st','ta','ep','ad','in','cc') { if (&Apache::lonnet::allowed('c'.$_,$thiscourse)) { my $plrole=&Apache::lonnet::plaintext($_); @@ -1065,6 +1068,22 @@ $table.= "\n"; } } + foreach (sort keys %customroles) { + my $plrole=$_; + $table .= < + +$plrole +$area + + +Set Start Date + +Set End Date +ENDENTRY + } } return '' if ($table eq ''); # return nothing if there is nothing # in the table From lon-capa-cvs@mail.lon-capa.org Fri Jul 18 21:58:33 2003 From: lon-capa-cvs@mail.lon-capa.org (bowersj2) Date: Fri, 18 Jul 2003 20:58:33 -0000 Subject: [LON-CAPA-cvs] cvs: doc /help texxml2latex.pl Message-ID: bowersj2 Fri Jul 18 16:58:33 2003 EDT Modified files: /doc/help texxml2latex.pl Log: Change default heading level to work better; escape pipes in RE expression as explained in comments. Index: doc/help/texxml2latex.pl diff -u doc/help/texxml2latex.pl:1.5 doc/help/texxml2latex.pl:1.6 --- doc/help/texxml2latex.pl:1.5 Fri Jul 18 16:42:27 2003 +++ doc/help/texxml2latex.pl Fri Jul 18 16:58:33 2003 @@ -81,13 +81,19 @@ my $file = $attr->{'file'}; my $section = $attr->{'section'}; if (!defined($section)) { $section = ''; } - else { $section = "-section $section"; } + else { + $section = "-section $section"; + # Escape the pipes so they are considered ORs in the + # RE for podselect's "section" option, and not + # pipes by the shell: + $section =~ s/\|/\\\|/g; + } $file = '../../loncom/' . $file; my $tempfile = 't' . substr($file, rindex($file, '/') + 1); system ("cp $file $tmpdir"); # The "echo" command is necessary; pod2latex can't # handle a perl file that starts with pod. - system ("echo > $tmpdir/$tempfile; cat $file | podselect $section >> $tmpdir/$tempfile; cd $tmpdir; pod2latex $tempfile"); + system ("echo > $tmpdir/$tempfile; cat $file | podselect $section >> $tmpdir/$tempfile; cd $tmpdir; pod2latex -h1level 2 $tempfile"); my $latexFile = substr($tempfile, 0, rindex($tempfile, '.')) . '.tex'; open LATEX_FILE, $tmpdir . '/' . $latexFile; print ; From lon-capa-cvs@mail.lon-capa.org Fri Jul 18 21:59:27 2003 From: lon-capa-cvs@mail.lon-capa.org (bowersj2) Date: Fri, 18 Jul 2003 20:59:27 -0000 Subject: [LON-CAPA-cvs] cvs: doc /help developer.manual.texxml Message-ID: bowersj2 Fri Jul 18 16:59:27 2003 EDT Added files: /doc/help developer.manual.texxml Log: The beginning of a developer manual for LON-CAPA; still somewhat experimental but should at least show lonnavmaps perldoc correctly rendered. Index: doc/help/developer.manual.texxml +++ doc/help/developer.manual.texxml <file name="Developer_Manual_Title_Page.tex"/> <section name="Nav Maps rendering and info"> <pod file="interface/lonnavmaps.pm" section="!NAME|SYNOPSIS" /> </section> </texxml> From lon-capa-cvs@mail.lon-capa.org Sat Jul 19 01:51:05 2003 From: lon-capa-cvs@mail.lon-capa.org (www) Date: Sat, 19 Jul 2003 00:51:05 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm Message-ID: <cvswww1058575865@cvsserver> www Fri Jul 18 20:51:05 2003 EDT Modified files: /loncom/interface loncreateuser.pm Log: Work on Bug #795: can now define and re-define a custom role, and can assign role to self. Still needs work to assign and revoke custom roles for other users. Index: loncom/interface/loncreateuser.pm diff -u loncom/interface/loncreateuser.pm:1.62 loncom/interface/loncreateuser.pm:1.63 --- loncom/interface/loncreateuser.pm:1.62 Fri Jul 18 16:53:06 2003 +++ loncom/interface/loncreateuser.pm Fri Jul 18 20:51:05 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.62 2003/07/18 20:53:06 www Exp $ +# $Id: loncreateuser.pm,v 1.63 2003/07/19 00:51:05 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -842,7 +842,7 @@ $rolename=$ENV{'form.newrolename'}; } - $rolename=~s/\W//gs; + $rolename=~s/[^A-Za-z0-9]//gs; unless ($rolename) { &print_username_entry_form($r); @@ -931,7 +931,7 @@ my $rolename=$ENV{'form.rolename'}; - $rolename=~s/\W//gs; + $rolename=~s/[^A-Za-z0-9]//gs; unless ($rolename) { &print_username_entry_form($r); @@ -978,8 +978,19 @@ $sysrole.=':'.$_; } } - $r->print('Defining Role: '. + $r->print('<br />Defining Role: '. &Apache::lonnet::definerole($rolename,$sysrole,$domrole,$courole)); + if ($ENV{'request.course.id'}) { + my $url='/'.$ENV{'request.course.id'}; + $url=~s/\_/\//g; + $r->print('<br />Assigning Role to Self: '. + &Apache::lonnet::assigncustomrole($ENV{'user.domain'}, + $ENV{'user.name'}, + $url, + $ENV{'user.domain'}, + $ENV{'user.name'}, + $rolename)); + } $r->print('</body></html>'); } From lon-capa-cvs@mail.lon-capa.org Sat Jul 19 14:11:41 2003 From: lon-capa-cvs@mail.lon-capa.org (ng) Date: Sat, 19 Jul 2003 13:11:41 -0000 Subject: [LON-CAPA-cvs] cvs: rat / lonpage.pm Message-ID: <cvsng1058620301@cvsserver> ng Sat Jul 19 09:11:41 2003 EDT Modified files: /rat lonpage.pm Log: Fix bug 1930 - remove target "lonCatInfo" from subm, pgrd & parm from page. Index: rat/lonpage.pm diff -u rat/lonpage.pm:1.51 rat/lonpage.pm:1.52 --- rat/lonpage.pm:1.51 Fri Apr 18 09:58:44 2003 +++ rat/lonpage.pm Sat Jul 19 09:11:41 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Page Handler # -# $Id: lonpage.pm,v 1.51 2003/04/18 13:58:44 www Exp $ +# $Id: lonpage.pm,v 1.52 2003/07/19 13:11:41 ng Exp $ # # Copyright Michigan State University Board of Trustees # @@ -414,15 +414,18 @@ &Apache::lonnet::declutter($hash{'src_'.$rid}); $metainfo.= '<a href="/adm/grades?symb='.&Apache::lonnet::escape($symb). - '&command=submission" target="LONcatInfo">'. +# '&command=submission" target="LONcatInfo">'. + '&command=submission">'. '<img src="/adm/lonMisc/subm_button.gif" border=0>'. '</img></a>'. '<a href="/adm/grades?symb='.&Apache::lonnet::escape($symb). - '&command=gradingmenu" target="LONcatInfo">'. +# '&command=gradingmenu" target="LONcatInfo">'. + '&command=gradingmenu">'. '<img src="/adm/lonMisc/pgrd_button.gif" border=0>'. '</img></a>'. '<a href="/adm/parmset?symb='.&Apache::lonnet::escape($symb). - '" target="LONcatInfo">'. +# '" target="LONcatInfo">'. + '" >'. '<img src="/adm/lonMisc/pprm_button.gif" border=0>'. '</img></a>'; } From lon-capa-cvs@mail.lon-capa.org Sat Jul 19 22:44:51 2003 From: lon-capa-cvs@mail.lon-capa.org (www) Date: Sat, 19 Jul 2003 21:44:51 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm Message-ID: <cvswww1058651091@cvsserver> www Sat Jul 19 17:44:51 2003 EDT Modified files: /loncom/interface loncreateuser.pm Log: Bug #795, continued. Index: loncom/interface/loncreateuser.pm diff -u loncom/interface/loncreateuser.pm:1.63 loncom/interface/loncreateuser.pm:1.64 --- loncom/interface/loncreateuser.pm:1.63 Fri Jul 18 20:51:05 2003 +++ loncom/interface/loncreateuser.pm Sat Jul 19 17:44:51 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.63 2003/07/19 00:51:05 www Exp $ +# $Id: loncreateuser.pm,v 1.64 2003/07/19 21:44:51 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -280,13 +280,16 @@ <table border=2> <tr><th>Revoke</th><th>Delete</th><th>Role</th><th>Extent</th><th>Start</th><th>End</th> END - foreach my $area (keys(%rolesdump)) { + foreach my $area (sort keys(%rolesdump)) { next if ($area =~ /^rolesdef/); my $role = $rolesdump{$area}; my $thisrole=$area; $area =~ s/\_\w\w$//; my ($role_code,$role_end_time,$role_start_time) = split(/_/,$role); +# Is this a custom role? Get role owner and title. + my ($croleudom,$croleuname,$croletitle)= + ($role_code=~/^cr\/(\w+)\/(\w+)\/(\w+)$/); my $bgcol='ffffff'; my $allowed=0; my $delallowed=0; @@ -312,6 +315,13 @@ (&Apache::lonnet::allowed('dro',$ccdomain))) { $delallowed=1; } +# - custom role. Needs more info, too + if ($croletitle) { + if (&Apache::lonnet::allowed('ccr',$1.'/'.$2)) { + $allowed=1; + $thisrole.='.'.$role_code; + } + } # Compute the background color based on $area $bgcol=$1.'_'.$2; $bgcol=~s/[^7-9a-e]//g; @@ -365,7 +375,14 @@ } else { $row.=' '; } - $row.= '</td><td>'.&Apache::lonnet::plaintext($role_code). + my $plaintext=''; + unless ($croletitle) { + $plaintext=&Apache::lonnet::plaintext($role_code); + } else { + $plaintext= + "Customrole '$croletitle' defined by $croleuname\@$croleudom"; + } + $row.= '</td><td>'.$plaintext. '</td><td>'.$area. '</td><td>'.($role_start_time?localtime($role_start_time) : ' ' ). @@ -735,7 +752,8 @@ next if (! $ENV{$_}); # Revoke roles if ($_=~/^form\.rev/) { - if ($_=~/^form\.rev\:([^\_]+)\_([^\_]+)$/) { + if ($_=~/^form\.rev\:([^\_]+)\_([^\_\.]+)$/) { +# Revoke standard role $r->print('Revoking '.$2.' in '.$1.': <b>'. &Apache::lonnet::assignrole($ENV{'form.ccdomain'}, $ENV{'form.ccuname'},$1,$2,$now).'</b><br>'); @@ -752,6 +770,12 @@ $ENV{'course.'.$cid.'.home'}).'</b><br>'); } } + if ($_=~/^form\.rev\:([^\_]+)\_cr\.cr\/(\w+)\/(\w+)\/(\w+)$/) { +# Revoke custom role + $r->print( + 'Revoking custom role '.$4.' by '.$3.'\@'.$2.' in '.$1.': <b>'. + '</b><br>'); + } } elsif ($_=~/^form\.del/) { if ($_=~/^form\.del\:([^\_]+)\_([^\_]+)$/) { $r->print('Deleting '.$2.' in '.$1.': '. @@ -826,7 +850,9 @@ $ENV{'form.ccdomain'},$ENV{'form.ccuname'}, $url,$2,$end,$start) .'</b><br>'); - } + } else { + $r->print('<p>ERROR: Unknown command <tt>'.$_.'</tt></p><br>'); + } } } # End of foreach (keys(%ENV)) $r->print('</body></html>'); From lon-capa-cvs@mail.lon-capa.org Sun Jul 20 01:39:02 2003 From: lon-capa-cvs@mail.lon-capa.org (www) Date: Sun, 20 Jul 2003 00:39:02 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm /lonnet/perl lonnet.pm Message-ID: <cvswww1058661542@cvsserver> www Sat Jul 19 20:39:02 2003 EDT Modified files: /loncom/interface loncreateuser.pm /loncom/lonnet/perl lonnet.pm Log: Fixed bug #795: handling of custom roles in CUSR Index: loncom/interface/loncreateuser.pm diff -u loncom/interface/loncreateuser.pm:1.64 loncom/interface/loncreateuser.pm:1.65 --- loncom/interface/loncreateuser.pm:1.64 Sat Jul 19 17:44:51 2003 +++ loncom/interface/loncreateuser.pm Sat Jul 19 20:39:01 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.64 2003/07/19 21:44:51 www Exp $ +# $Id: loncreateuser.pm,v 1.65 2003/07/20 00:39:01 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -755,8 +755,8 @@ if ($_=~/^form\.rev\:([^\_]+)\_([^\_\.]+)$/) { # Revoke standard role $r->print('Revoking '.$2.' in '.$1.': <b>'. - &Apache::lonnet::assignrole($ENV{'form.ccdomain'}, - $ENV{'form.ccuname'},$1,$2,$now).'</b><br>'); + &Apache::lonnet::revokerole($ENV{'form.ccdomain'}, + $ENV{'form.ccuname'},$1,$2).'</b><br>'); if ($2 eq 'st') { $1=~/^\/(\w+)\/(\w+)/; my $cid=$1.'_'.$2; @@ -773,7 +773,9 @@ if ($_=~/^form\.rev\:([^\_]+)\_cr\.cr\/(\w+)\/(\w+)\/(\w+)$/) { # Revoke custom role $r->print( - 'Revoking custom role '.$4.' by '.$3.'\@'.$2.' in '.$1.': <b>'. + 'Revoking custom role '.$4.' by '.$3.'@'.$2.' in '.$1.': <b>'. +&Apache::lonnet::revokecustomrole($ENV{'form.ccdomain'}, + $ENV{'form.ccuname'},$1,$2,$3,$4). '</b><br>'); } } elsif ($_=~/^form\.del/) { @@ -795,7 +797,29 @@ } } } elsif ($_=~/^form\.act/) { - if ($_=~/^form\.act\_([^\_]+)\_([^\_]+)\_([^\_]+)$/) { + if +($_=~/^form\.act\_([^\_]+)\_([^\_]+)\_cr_cr_([^\_]+)_(\w+)_([^\_]+)$/) { + # Activate a custom role + my $url='/'.$1.'/'.$2; + my $full=$1.'_'.$2.'_cr_cr_'.$3.'_'.$4.'_'.$5; + if ($ENV{'form.sec_'.$full}) { + $url.='/'.$ENV{'form.sec_'.$full}; + } + + my $start = ( $ENV{'form.start_'.$full} ? + $ENV{'form.start_'.$full} : + $now ); + my $end = ( $ENV{'form.end_'.$full} ? + $ENV{'form.end_'.$full} : + 0 ); + + $r->print('Assigning custom role "'.$5.'" by '.$4.'@'.$3.' in '.$url. + ($start?', starting '.localtime($start):''). + ($end?', ending '.localtime($end):'').': <b>'. + &Apache::lonnet::assigncustomrole( + $ENV{'form.ccdomain'},$ENV{'form.ccuname'},$url,$3,$4,$5,$end,$start). + '</b><br>'); + } elsif ($_=~/^form\.act\_([^\_]+)\_([^\_]+)\_([^\_]+)$/) { # Activate roles for sections with 3 id numbers # set start, end times, and the url for the class @@ -810,7 +834,7 @@ $url.='/'.$ENV{'form.sec_'.$1.'_'.$2.'_'.$3}; } # Assign the role and report it - $r->print('Assigning: '.$3.' in '.$url. + $r->print('Assigning '.$3.' in '.$url. ($start?', starting '.localtime($start):''). ($end?', ending '.localtime($end):'').': <b>'. &Apache::lonnet::assignrole( @@ -843,7 +867,7 @@ 0 ); my $url='/'.$1.'/'; # Assign the role and report it. - $r->print('Assigning: '.$2.' in '.$url.': '. + $r->print('Assigning '.$2.' in '.$url.': '. ($start?', starting '.localtime($start):''). ($end?', ending '.localtime($end):'').': <b>'. &Apache::lonnet::assignrole( @@ -1106,20 +1130,24 @@ } } foreach (sort keys %customroles) { - my $plrole=$_; - $table .= <<ENDENTRY; + if (&Apache::lonnet::allowed('ccr',$thiscourse)) { + my $plrole=$_; + my $customrole=$protectedcourse.'_cr_cr_'.$ENV{'user.domain'}. + '_'.$ENV{'user.name'}.'_'.$plrole; + $table .= <<ENDENTRY; <tr bgcolor="#$bgcol"> -<td><input type="checkbox" name="act_$protectedcourse\_$_"></td> +<td><input type="checkbox" name="act_$customrole"></td> <td>$plrole</td> <td>$area</td> -<td><input type="text" size="5" name="sec_$protectedcourse\_$_"></td> -<td><input type=hidden name="start_$protectedcourse\_$_" value=''> +<td><input type="text" size="5" name="sec_$customrole"></td> +<td><input type=hidden name="start_$customrole" value=''> <a href= -"javascript:pjump('date_start','Start Date $plrole',document.cu.start_$protectedcourse\_$_.value,'start_$protectedcourse\_$_','cu.pres','dateset')">Set Start Date</a></td> -<td><input type=hidden name="end_$protectedcourse\_$_" value=''> +"javascript:pjump('date_start','Start Date $plrole',document.cu.start_$customrole.value,'start_$customrole','cu.pres','dateset')">Set Start Date</a></td> +<td><input type=hidden name="end_$customrole" value=''> <a href= -"javascript:pjump('date_end','End Date $plrole',document.cu.end_$protectedcourse\_$_.value,'end_$protectedcourse\_$_','cu.pres','dateset')">Set End Date</a></td></tr> +"javascript:pjump('date_end','End Date $plrole',document.cu.end_$customrole.value,'end_$customrole','cu.pres','dateset')">Set End Date</a></td></tr> ENDENTRY + } } } return '' if ($table eq ''); # return nothing if there is nothing Index: loncom/lonnet/perl/lonnet.pm diff -u loncom/lonnet/perl/lonnet.pm:1.392 loncom/lonnet/perl/lonnet.pm:1.393 --- loncom/lonnet/perl/lonnet.pm:1.392 Fri Jul 18 15:50:28 2003 +++ loncom/lonnet/perl/lonnet.pm Sat Jul 19 20:39:02 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.392 2003/07/18 19:50:28 www Exp $ +# $Id: lonnet.pm,v 1.393 2003/07/20 00:39:02 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2651,7 +2651,9 @@ my ($udom,$uname,$url,$role,$end,$start,$deleteflag)=@_; my $mrole; if ($role =~ /^cr\//) { - unless (&allowed('ccr',$url)) { + my $cwosec=$url; + $cwosec=~s/^\/(\w+)\/(\w+)\/.*/$1\/$2/; + unless (&allowed('ccr',$cwosec)) { &logthis('Refused custom assignrole: '. $udom.' '.$uname.' '.$url.' '.$role.' '.$end.' '.$start.' by '. $ENV{'user.name'}.' at '.$ENV{'user.domain'}); From k9pyi.npg5e@hotmail.com Fri Jul 18 08:32:53 2003 From: k9pyi.npg5e@hotmail.com (=?Big5?B?sNOrfqtQvlDAdbRmpOiu17nqrEmkpA==?=) Date: Fri, 18 Jul 2003 15:32:53 +0800 Subject: [LON-CAPA-cvs] =?Big5?B?sOqkurr0uPTByqqrt37BWrxXvFek6aRX?= Message-ID: <200307180024140.SM01184@201.144.13.92> This is a multi-part message in MIME format --=_NextPart_2rfkindysadvnqw3nerasdf Content-Type: text/plain Content-Transfer-Encoding: quoted-printable charset="BIG-5" --=_NextPart_2rfkindysadvnqw3nerasdf Content-Type: text/html Content-Transfer-Encoding: 7bit charset="BIG-5" <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">  <HTML><HEAD> <TITLE>璹綷 璹綷 璹綷穝糤呼1 穝糤呼1 窾禪褐100







叫秈ㄓ恶糶戈┪〆癠

璹綷

(Remove Email)



FastCounter by bCentral

--=_NextPart_2rfkindysadvnqw3nerasdf-- From lon-capa-cvs@mail.lon-capa.org Sat Jul 19 16:11:27 2003 From: lon-capa-cvs@mail.lon-capa.org (ng) Date: Sat, 19 Jul 2003 15:11:27 -0000 Subject: [LON-CAPA-cvs] cvs: loncom /homework grades.pm Message-ID: ng Sat Jul 19 11:11:27 2003 EDT Modified files: /loncom/homework grades.pm Log: fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. fix bug 763 - when displaying submission page for a student from the chart page gives option to grade that student. Index: loncom/homework/grades.pm diff -u loncom/homework/grades.pm:1.119 loncom/homework/grades.pm:1.120 --- loncom/homework/grades.pm:1.119 Fri Jul 18 16:14:35 2003 +++ loncom/homework/grades.pm Sat Jul 19 11:11:27 2003 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.119 2003/07/18 20:14:35 ng Exp $ +# $Id: grades.pm,v 1.120 2003/07/19 15:11:27 ng Exp $ # # Copyright Michigan State University Board of Trustees # @@ -707,9 +707,10 @@ } function checkSolved(formname,id) { - if (eval("formname.solved"+id+".value") == "correct_by_student") { + if (eval("formname.solved"+id+".value") == "correct_by_student" && formname.overRideScore.value == 'no') { var reply = confirm("This problem has been graded correct by the computer. Do you want to change the score?"); if (!reply) {return "noupdate";} + formname.overRideScore.value = 'yes'; } return "update"; } @@ -747,6 +748,14 @@ formname.submit(); } +//======= Process request to show the grading page from SUBM, CHART buttons + function gradeStudent(formname,ptr) { + formname.gradeOpt.value = 'Grade Student'; + formname.showgrading.value = "yes"; + formname.studentNo.value = ptr; + formname.submit(); + } + //======= Check that a score is assigned for all the problems (page/sequence grading only) ========= function checkSubmitPage(formname,total) { noscore = new Array(100); @@ -1160,6 +1169,7 @@ (my $url=$ENV{'form.url'})=~s-^http://($ENV{'SERVER_NAME'}|$ENV{'HTTP_HOST'})--; my ($uname,$udom) = ($ENV{'form.student'},$ENV{'form.userdom'}); + $udom = ($udom eq '' ? $ENV{'user.domain'} : $udom); #has form.userdom changed for a student? my $usec = &Apache::lonnet::getsection($udom,$uname,$ENV{'request.course.id'}); $ENV{'form.fullname'} = &get_fullname ($uname,$udom) if $ENV{'form.fullname'} eq ''; @@ -1173,6 +1183,7 @@ return; } + $ENV{'form.lastSub'} = ($ENV{'form.lastSub'} eq '' ? 'all' : $ENV{'form.lastSub'}); my $last = ($ENV{'form.lastSub'} eq 'last' ? 'last' : ''); # header info @@ -1217,13 +1228,17 @@ $ENV{'form.savemsgN'} = $keyhash{$symb.'_savemsgN'} ne '' ? $keyhash{$symb.'_savemsgN'} : '0'; } + my $overRideScore = $ENV{'form.overRideScore'} eq '' ? 'no' : $ENV{'form.overRideScore'}; $request->print('
'."\n". ''."\n". ''."\n". ''."\n". + ''."\n". ''."\n". ''."\n". + ''."\n". + ''."\n". ''."\n". ''."\n". ''."\n". @@ -1279,7 +1294,6 @@ $request->print('

') if ($counter > 0); $request->print(&show_problem($request,$symb,$uname,$udom,1,1)); } - my %record = &Apache::lonnet::restore($symb,$ENV{'request.course.id'},$udom,$uname); my ($partlist,$handgrade) = &response_type($url); @@ -1426,20 +1440,25 @@ $last,'.submission', 'Apache::grades::keywords_highlight')); } + + $result=''."\n". + ''."\n". + ''."\n"; + $request->print($result); # return if view submission with no grading option if ($ENV{'form.showgrading'} eq '' || (!&canmodify($usec))) { - $request->print('
'."\n"); - $request->print(&show_grading_menu_form($symb,$url)) + my $toGrade.=' '."\n"; + $toGrade.=''."\n"; + $toGrade.=&show_grading_menu_form($symb,$url) if (($ENV{'form.command'} eq 'submission') || ($ENV{'form.command'} eq 'processGroup' && $counter == $total)); + $request = print($toGrade); return; } - $result=''."\n". - ''."\n". - ''."\n"; # essay grading options if ($ENV{'form.handgrade'} eq 'yes') { my ($lastname,$givenn) = split(/,/,$ENV{'form.fullname'}); @@ -1450,7 +1469,7 @@ } $msgfor =~ s/\'/\\'/g; #' stupid emacs - no! javascript # $result.=''."\n". - $result.=' '. 'Compose Message to student'.(scalar(@col_fullnames) >= 1 ? 's' : '').' '. ''. - ''."\n"; + my $endform='
'."\n"; +# ''."\n"; $endform.=' '."\n"; @@ -1554,7 +1573,6 @@ my $button = $ENV{'form.gradeOpt'}; my $ngrade = $ENV{'form.NCT'}; my $ntstu = $ENV{'form.NTSTU'}; - if ($button eq 'Save & Next') { my $ctr = 0; while ($ctr < $ngrade) { @@ -1668,6 +1686,15 @@ return ''; } +# Go directly to grade student - from submission page + if ($button eq 'Grade Student') { + my $processUser = $ENV{'form.unamedom'.$ENV{'form.studentNo'}}; + ($ENV{'form.student'},$ENV{'form.userdom'}) = split(/:/,$processUser); + $ENV{'form.fullname'} = $$fullname{$processUser}; + &submission($request,0,0); + return ''; + } + # Get the next/previous one or group of students my $firststu = $ENV{'form.unamedom0'}; my $laststu = $ENV{'form.unamedom'.($ngrade-1)}; @@ -2779,7 +2806,8 @@ if($curRes == $iterator->BEGIN_MAP) { $depth++; } if($curRes == $iterator->END_MAP) { $depth--; } - if (ref($curRes) && $curRes->is_problem() && !$curRes->randomout) { +# if (ref($curRes) && $curRes->is_problem() && !$curRes->randomout) { + if (ref($curRes) && $curRes->is_problem()) { my $parts = $curRes->parts(); my $title = $curRes->compTitle(); my $symbx = $curRes->symb();

'. + ' '.'One or more students for current resource'. + ' -->For students who has: '. ' submitted'. ' everybody
'. - ' '. - 'Upload scores from file
'. + ''. + '

'. + ''. + ' scores from file
'. - ' '. - 'Grade scantron forms
'. - ' '. - 'Verify a submission receipt issued by this server	--> Receipt no: '.unpack("%32C",$Apache::lonnet::perlvar{'lonHostID'}). + ''. + ' submission Receipt no: '.unpack("%32C",$Apache::lonnet::perlvar{'lonHostID'}). '-'. '
'."\n". - ' Select section: '; - - $result.='Student Status:'.&Apache::lonhtmlcommon::StatusOptions($saveStatus,undef,1,undef); - $result.=' (Applies to the first three options only.)'."\n"; - - if (ref($sections)) { - $result.=' (Section "no" implies the students were not assigned a section.) ' - if (grep /no/,@$sections); - } - $result.='
'. - ''."\n". - '

Privilege	Course Level	Domain Level	System Level
'.&Apache::lonnet::plaintext($_).'	'. - $courselevel{$_}.'	'.$domainlevel{$_}.'
'. + ($domainlevel{$_}?'':' '). + '	'. + ($systemlevel{$_}?'':' '). + '