--- loncom/interface/courseprefs.pm 2010/02/21 01:06:13 1.8.2.7
+++ loncom/interface/courseprefs.pm 2010/01/07 20:33:22 1.18
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set configuration settings for a course
#
-# $Id: courseprefs.pm,v 1.8.2.7 2010/02/21 01:06:13 raeburn Exp $
+# $Id: courseprefs.pm,v 1.18 2010/01/07 20:33:22 faziophi Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -28,185 +28,6 @@
###############################################################
##############################################################
-=pod
-
-=head1 NAME
-
-courseprefs- Handler to set/modify course configuration
-
-=head1 SYNOPSIS
-
-courseprefs provides an interface for setting general course configuration
-
-=head1 DESCRIPTION
-
-This module is used for configuration of a course
-
-=head1 INTERNAL SUBROUTINES
-
-=over
-
-=item get_allitems()
-
-=item print_config_box()
-
-=item process_changes()
-
-=item get_sec_str()
-
-=item check_clone()
-
-=item store_changes()
-
-=item update_env()
-
-=item display_disallowed()
-
-=item get_course()
-
-=item get_jscript()
-
-=item cloners_javascript()
-
-=item print_courseinfo()
-
-=item new_cloners_dom_row()
-
-=item can_modify_catsettings()
-
-=item assign_course_categories()
-
-=item print_localization()
-
-=item get_lang_choices()
-
-=item print_feedback()
-
-=item user_table()
-
-=item select_recipient()
-
-=item select_sections()
-
-=item print_discussion()
-
-=item role_checkboxes()
-
-=item print_classlists()
-
-=item print_appearance()
-
-=item print_grading()
-
-=item print_printouts()
-
-=item print_spreadsheet()
-
-=item print_bridgetasks()
-
-=item print_other()
-
-=item get_other_items()
-
-=item item_table_row_start()
-
-=item item_table_row_end()
-
-=item yes_no_radio()
-
-=item select_from_options()
-
-=item make_item_rows()
-
-Creates table used to display and set course configuration items.
-
-Inputs: $cdom,$items,$ordered,$settings,$rowtotal,$crstype
-where $cdom is course's domain, $items is HASH ref for current config
-item, $ordered is ARRAY ref of items to include in row in
-display order, $settings is HASH ref of current values forrow,
-$rowtotal is SCALAR ref used to accumulate row count, $crstype is
-course type.
-
-Returns: $datatable
-HTML mark-up of data table which accumulates individual rows.
-
-=item nothidepriv_row()
-
-Creates row containing form elements used to display and set
-whether Domain coordinators who are currently included in
-advanced course user .db file for a course are to be hidden (e.g.,
-in syllabus, or from course user lists).
-
-Inputs: $cdom,$item,$settings,$crstype
-where $cdom is course domain, item is nothideprivileged, $settings is
-HASH ref of the current values for nothideprivileged, $crstype is
-course type (Course or Community).
-
-Returns: $datatable
-HTML mark-up for Privileged users (Domain Coordinators) in staff listing.
-
-=item print_hdrfmt_row()
-
-Creates row containing form elements used to display and set
-substitution items and text to be used in the header included
-on printouts.
-
-Inputs: $item,$settings
-where $item is print_header_format, and $settings is a HASH ref
-of the current values stored for print_header_format.
-
-Returns: $output
-HTML mark-up containing Javascript functions: reOrder() and getIndexByName()
-used to dynamically update position selectboxes, and HTML table elements
-for the "Print header format" row.
-
-=item position_selector()
-
-Creates a select box which can be used to reorder substitutions
-and text included in a printout header.
-
-Inputs: $pos,$num,$maxnum
-where $pos is current position, $num is the unique identifier,
-and $maxnum is the total number of items (both substitutions
-and text in the printout header.
-
-Returns: $output
-HTML mark-up for the selectbox and a hidden form element containing
-the current position.
-
-=item substitution_selector()
-
-Creates a combination of select box for choosing an item
-(student name, course ID or assignment note) to substitute,
-and a corresponding size limit in the header used for printouts.
-
-Inputs: $num,$subst,$limit,$crstype
-where $num is the unique identifier, $subst is the current
-substitution (n,c or a, for name, course or note respectively,
-$limit is the current size limit (integer), and $crstype is
-course type - course or community.
-
-Returns: $output
-HTML mark-up for selectbox and textbox (separate table cells).
-
-=item change_clone()
-
-Modifies the list of courses a user can clone (stored
-in the user's environment.db file), called when a
-change is made to the list of users allowed to clone
-a course.
-
-Inputs: $action,$cloner
-where $action is add or drop, and $cloner is identity of
-user for whom cloning ability is to be changed in course.
-
-Returns: nothing
-
-=back
-
-=cut
-
-
package Apache::courseprefs;
use strict;
@@ -294,15 +115,15 @@ sub handler {
%lt = (
conf => 'Course Configuration',
edit => 'Edit Course Configuration',
- gens => 'General course settings',
- idnu => 'Course ID or number',
- desc => 'Course Description',
+ gens => 'General Settings',
+ idnu => 'ID/Number',
+ desc => 'Title',
catg => 'Categorize course',
excc => 'Exclude from course catalog',
clon => 'Users allowed to clone course',
rept => 'Replacement titles for standard course roles',
- time => 'Timezone in which the course takes place',
- date => 'Locale used for course calendar',
+ time => 'Timezone',
+ date => 'Calendar Locale',
coco => 'Course Content',
copo => 'Course Policy',
priv => 'Domain Coordinators in course',
@@ -340,36 +161,32 @@ sub handler {
'courseinfo' =>
{ text => $lt{'gens'},
help => 'Course_Environment',
- header => [{col1 => 'Setting',
- col2 => 'Value'}],
ordered => ['description','courseid','categories',
- 'hidefromcat','cloners','externalsyllabus',
- 'url','rolenames'],
+ 'hidefromcat','externalsyllabus',
+ 'url','rolenames','cloners'],
itemtext => {
description => $lt{'desc'},
courseid => $lt{'idnu'},
categories => $lt{'catg'},
hidefromcat => $lt{'excc'},
cloners => $lt{'clon'},
- externalsyllabus => 'URL of Syllabus',
+ externalsyllabus => 'External Syllabus URL',
url => 'Top Level Map',
rolenames => $lt{'rept'},
},
},
'localization' =>
- { text => 'Language/TimeZone/Locale',
+ { text => 'Language & Time Localization',
help => 'Course_Environment',
- header => [{col1 => 'Setting',
- col2 => 'Value',}],
ordered => ['languages','timezone','datelocale'],
itemtext => {
- languages => 'Languages used',
+ languages => 'Language(s)',
timezone => $lt{'time'},
datelocale => $lt{'date'},
},
},
'feedback' =>
- { text => 'Feedback messages',
+ { text => 'Feedback Messages',
help => 'Course_Environment',
header => [{col1 => 'Questions about:',
col2 => 'Recipients'},
@@ -385,19 +202,17 @@ sub handler {
'discussion' =>
{ text => 'Discussion and Chat',
help => 'Course_Environment',
- header => [{col1 => 'Setting',
- col2 => 'Value',}],
ordered => ['plc.roles.denied','plc.users.denied',
'pch.roles.denied','pch.users.denied',
'allow_limited_html_in_feedback',
'allow_discussion_post_editing'],
itemtext => {
- 'plc.roles.denied' => 'No Resource Discussion',
- 'plc.users.denied' => 'No Resource Discussion',
- 'pch.roles.denied' => 'No Chat room use',
- 'pch.users.denied' => 'No Chat room use',
- allow_limited_html_in_feedback => 'Allow limited HTML in discussion posts',
- allow_discussion_post_editing => 'Users can edit/delete own discussion posts',
+ 'plc.roles.denied' => 'Disable resource discussion',
+ 'plc.users.denied' => 'Disable resource discussion',
+ 'pch.roles.denied' => 'Disable chat room',
+ 'pch.users.denied' => 'Disable chat room',
+ allow_limited_html_in_feedback => 'HTML in discussion',
+ allow_discussion_post_editing => 'Allow users to edit/delete own discussion posts',
},
},
'classlists' =>
@@ -423,57 +238,50 @@ sub handler {
},
},
'appearance' =>
- { text => 'Display of resources ',
+ { text => 'Display of Resources ',
help => 'Course_Environment',
- header => [{col1 => 'Setting',
- col2 => 'Value'}],
ordered => ['default_xml_style','pageseparators',
'disable_receipt_display','texengine',
'tthoptions'],
itemtext => {
- default_xml_style => 'Default XML Style File',
- pageseparators => 'Visibly Separate Items on Pages',
- disable_receipt_display => 'Disable display of problem receipts',
- texengine => 'Force use of a specific math rendering engine',
+ default_xml_style => 'Default XML style file',
+ pageseparators => 'Separate items on composite pages',
+ disable_receipt_display => 'Disable problem receipts display',
+ texengine => 'Force specific math rendering engine',
tthoptions => 'Default set of options to pass to tth/m when converting TeX',
},
},
'grading' =>
{ text => 'Grading',
help => 'Course_Environment',
- header => [{col1 => 'Setting',
- col2 => 'Value',}],
ordered => ['grading','rndseed',
'receiptalg','disablesigfigs'],
itemtext => {
- grading => 'Grading',
- rndseed => 'Randomization algorithm used',
- receiptalg => 'Receipt algorithm used',
- disablesigfigs => 'Disable checking of Significant Figures',
+ grading => 'Grading Type',
+ rndseed => 'Randomization algorithm',
+ receiptalg => 'Receipt algorithm',
+ disablesigfigs => 'Disable significant figure checks',
},
},
'printouts' =>
- { text => 'Printout generation',
+ { text => 'Printouts',
help => 'Course_Environment',
- header => [{col1 => 'Setting',
- col2 => 'Value',}],
ordered => ['problem_stream_switch','suppress_tries',
'default_paper_size','print_header_format',
- 'disableexampointprint'],
+ 'disableexampointprint','canuse_pdfforms'],
itemtext => {
problem_stream_switch => 'Allow problems to be split over pages',
suppress_tries => 'Suppress number of tries in printing',
default_paper_size => 'Default paper type',
print_header_format => 'Print header format',
disableexampointprint => 'Disable automatically printing point values on exams',
+ canuse_pdfforms => 'Users can print problems as PDF forms and upload later for grading',
},
},
'spreadsheet' =>
{ text => 'Spreadsheets',
help => 'Course_Environment',
- header => [{col1 => 'Setting',
- col2 => 'Value'}],
ordered => ['spreadsheet_default_classcalc',
'spreadsheet_default_studentcalc',
'spreadsheet_default_assesscalc','hideemptyrows'],
@@ -487,8 +295,6 @@ sub handler {
'bridgetasks' =>
{ text => 'Bridge tasks',
help => 'Course_Environment',
- header => [{col1 => 'Setting',
- col2 => 'Value'}],
ordered => ['task_messages','task_grading',
'suppress_embed_prompt'],
itemtext => {
@@ -544,21 +350,20 @@ sub print_config_box {
my $itemtext = $item->{'itemtext'};
my $rowtotal = 0;
my $output =
- '