[LON-CAPA-cvs] cvs: loncom /auth localauth.pm lonacc.pm /homework edit.pm grades.pm imageresponse.pm optionresponse.pm outputtags.pm radiobuttonresponse.pm randomlabel.pm /interface loncreatecourse.pm loncreateuser.pm londocs.pm londropadd.pm lonerrorhandler.pm lonevaluate.pm lonfeedback.pm lonmeta.pm /publisher lonupload.pm
jms
lon-capa-cvs-allow@mail.lon-capa.org
Tue, 18 Nov 2008 19:14:41 -0000
This is a MIME encoded message
--jms1227035681
Content-Type: text/plain
jms Tue Nov 18 19:14:41 2008 EDT
Modified files:
/loncom/interface londocs.pm loncreateuser.pm lonevaluate.pm
londropadd.pm lonerrorhandler.pm lonmeta.pm
lonfeedback.pm loncreatecourse.pm
/loncom/homework outputtags.pm edit.pm grades.pm optionresponse.pm
imageresponse.pm randomlabel.pm
radiobuttonresponse.pm
/loncom/auth localauth.pm lonacc.pm
/loncom/publisher lonupload.pm
Log:
Added/updated/converted POD. Many files had their POD redone to new standards.
--jms1227035681
Content-Type: text/plain
Content-Disposition: attachment; filename="jms-20081118191441.txt"
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.315 loncom/interface/londocs.pm:1.316
--- loncom/interface/londocs.pm:1.315 Mon Nov 17 14:46:10 2008
+++ loncom/interface/londocs.pm Tue Nov 18 19:14:22 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.315 2008/11/17 14:46:10 jms Exp $
+# $Id: londocs.pm,v 1.316 2008/11/18 19:14:22 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -29,7 +29,7 @@
=head1 NAME
-Apache::londocs
+Apache::londocs.pm
=head1 SYNOPSIS
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.262 loncom/interface/loncreateuser.pm:1.263
--- loncom/interface/loncreateuser.pm:1.262 Mon Nov 17 14:31:33 2008
+++ loncom/interface/loncreateuser.pm Tue Nov 18 19:14:22 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Create a user
#
-# $Id: loncreateuser.pm,v 1.262 2008/11/17 14:31:33 schafran Exp $
+# $Id: loncreateuser.pm,v 1.263 2008/11/18 19:14:22 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -33,11 +33,13 @@
=head1 NAME
-Apache::loncreateuser - handler to create users and custom roles
+Apache::loncreateuser.pm
=head1 SYNOPSIS
-Apache::loncreateuser provides an Apache handler for creating users,
+ Handler to create users and custom roles
+
+ Provides an Apache handler for creating users,
editing their login parameters, roles, and removing roles, and
also creating and assigning custom roles.
Index: loncom/interface/lonevaluate.pm
diff -u loncom/interface/lonevaluate.pm:1.24 loncom/interface/lonevaluate.pm:1.25
--- loncom/interface/lonevaluate.pm:1.24 Wed Nov 28 01:46:12 2007
+++ loncom/interface/lonevaluate.pm Tue Nov 18 19:14:22 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Evaluate
#
-# $Id: lonevaluate.pm,v 1.24 2007/11/28 01:46:12 albertel Exp $
+# $Id: lonevaluate.pm,v 1.25 2008/11/18 19:14:22 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -26,6 +26,25 @@
# http://www.lon-capa.org/
#
+=pod
+
+=head1 NAME
+
+Apache::lonevaluate.pm
+
+=head1 SYNOPSIS
+
+Handles evaluation.
+
+This is part of the LearningOnline Network with CAPA project
+described at http://www.lon-capa.org.
+
+=head1 OVERVIEW
+
+None
+
+=cut
+
package Apache::lonevaluate;
use strict;
Index: loncom/interface/londropadd.pm
diff -u loncom/interface/londropadd.pm:1.175 loncom/interface/londropadd.pm:1.176
--- loncom/interface/londropadd.pm:1.175 Mon Nov 17 15:48:46 2008
+++ loncom/interface/londropadd.pm Tue Nov 18 19:14:22 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to drop and add students in courses
#
-# $Id: londropadd.pm,v 1.175 2008/11/17 15:48:46 jms Exp $
+# $Id: londropadd.pm,v 1.176 2008/11/18 19:14:22 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -29,7 +29,7 @@
=head1 NAME
-Apache::londropadd
+Apache::londropadd.pm
=head1 SYNOPSIS
Index: loncom/interface/lonerrorhandler.pm
diff -u loncom/interface/lonerrorhandler.pm:1.18 loncom/interface/lonerrorhandler.pm:1.19
--- loncom/interface/lonerrorhandler.pm:1.18 Mon Nov 17 14:11:24 2008
+++ loncom/interface/lonerrorhandler.pm Tue Nov 18 19:14:22 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Internal Server Error Handler
#
-# $Id: lonerrorhandler.pm,v 1.18 2008/11/17 14:11:24 schafran Exp $
+# $Id: lonerrorhandler.pm,v 1.19 2008/11/18 19:14:22 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -26,6 +26,25 @@
# http://www.lon-capa.org/
#
+=pod
+
+=head1 NAME
+
+Apache::lonerrorhandler.pm
+
+=head1 SYNOPSIS
+
+Handles errors.
+
+This is part of the LearningOnline Network with CAPA project
+described at http://www.lon-capa.org.
+
+=head1 OVERVIEW
+
+None
+
+=cut
+
package Apache::lonerrorhandler;
use strict;
Index: loncom/interface/lonmeta.pm
diff -u loncom/interface/lonmeta.pm:1.214 loncom/interface/lonmeta.pm:1.215
--- loncom/interface/lonmeta.pm:1.214 Mon Nov 17 14:06:14 2008
+++ loncom/interface/lonmeta.pm Tue Nov 18 19:14:22 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Metadata display handler
#
-# $Id: lonmeta.pm,v 1.214 2008/11/17 14:06:14 schafran Exp $
+# $Id: lonmeta.pm,v 1.215 2008/11/18 19:14:22 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -37,17 +37,11 @@
This is part of the LearningOnline Network with CAPA project
described at http://www.lon-capa.org.
-=head1 HANDLER SUBROUTINE
-
-handler()
-
-=head1 OTHER SUBROUTINES
+=head1 SUBROUTINES
=over
-=item *
-
-&get_dynamic_metadata_from_sql($url) :
+=item &get_dynamic_metadata_from_sql($url) :
Queries sql database for dynamic metdata
Returns a hash of hashes, with keys of urls which match $url
@@ -60,101 +54,65 @@
$DynamicMetadata{'/res/msu/korte/example.problem'}->{$field}
-=item *
-
-dynamicmeta() : Fetch and evaluate dynamic metadata
-
-=item *
-
-access_count()
-
-=item *
-
-alttag() : Try to make an alt tag if there is none
-
-=item *
-
-authordisplay() : Author display
-
-=item *
-
-evalgraph() : Pretty display
-
-=item *
-
-diffgraph()
-
-=item *
-
-fieldnames()
-
-=item *
-
-portfolio_linked_path()
-
-=item *
-
-get_port_path_and_group()
-
-=item *
+=item dynamicmeta()
-portfolio_display_uri()
+Fetch and evaluate dynamic metadata
-=item *
+=item access_count()
-pre_select_course()
+=item alttag()
-=item *
+Try to make an alt tag if there is none
-select_course()
+=item authordisplay()
-=item *
+Author display
-prettyprint() : Pretty printing of metadata field
+=item evalgraph()
-=item *
+Pretty display
-direct() : Pretty input of metadata field
+=item diffgraph()
-=item *
+=item fieldnames()
-selectbox()
+=item portfolio_linked_path()
-=item *
+=item get_port_path_and_group()
-relatedfield()
+=item portfolio_display_uri()
-=item *
+=item pre_select_course()
-prettyinput()
+=item select_course()
-=item *
+=item prettyprint()
-report_bombs()
+Pretty printing of metadata field
-=item *
+=item direct()
-present_uneditable_metadata()
+Pretty input of metadata field
-=item *
+=item selectbox()
-present_editable_metadata()
+=item relatedfield()
-=item *
+=item prettyinput()
-store_metadata()
+=item report_bombs()
-=item *
+=item present_uneditable_metadata()
-store_transferred_addedfields()
+=item present_editable_metadata()
-=item *
+=item store_metadata()
-store_portfolio_metadata()
+=item store_transferred_addedfields()
-=item *
+=item store_portfolio_metadata()
-update_metadata_table()
+=item update_metadata_table()
=back
Index: loncom/interface/lonfeedback.pm
diff -u loncom/interface/lonfeedback.pm:1.255 loncom/interface/lonfeedback.pm:1.256
--- loncom/interface/lonfeedback.pm:1.255 Fri Jun 6 05:24:28 2008
+++ loncom/interface/lonfeedback.pm Tue Nov 18 19:14:22 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Feedback
#
-# $Id: lonfeedback.pm,v 1.255 2008/06/06 05:24:28 raeburn Exp $
+# $Id: lonfeedback.pm,v 1.256 2008/11/18 19:14:22 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -27,6 +27,133 @@
#
###
+=pod
+
+=head1 NAME
+
+Apache::lonfeedback.pm
+
+=head1 SYNOPSIS
+
+Handles feedback from students to instructors and system administrators.
+
+Provides a screenshot of the current resource, as well as previous attempts if the resource was a homework.
+
+Used by lonmsg.pm.
+
+This is part of the LearningOnline Network with CAPA project
+described at http://www.lon-capa.org.
+
+=head1 OVERVIEW
+
+None
+
+=head1 SUBROUTINES
+
+=over
+
+=item discussion_open()
+
+=item discussion_visible()
+
+=item list_discussion()
+
+=item send_feedback_link()
+
+=item send_message_link()
+
+=item action_links_bar()
+
+=item postingform_display()
+
+=item build_posting_display
+
+=item filter_regexp()
+
+=item get_post_contents()
+
+=item replicate_attachments()
+
+=item mail_screen()
+
+=item print_display_options()
+
+=item print_sortfilter_options()
+
+=item print_showposters()
+
+=item get_post_versions()
+
+=item get_post_attachments()
+
+=item fail_redirect()
+
+=item redirect_back()
+
+=item no_redirect_back()
+
+=item screen_header()
+
+=item resource_output()
+
+=item clear_out_html()
+
+=item assemble_email()
+
+=item feedback_available()
+
+=item send_msg()
+
+=item adddiscuss()
+
+=item get_discussion_info()
+
+=item show_preview()
+
+=item newline_to_br()
+
+=item generate_preview_button()
+
+=item modify_attachments()
+
+=item process_attachments()
+
+=item generate_attachments_button()
+
+=item extract_attachments()
+
+=item construct_attachmenturl()
+
+=item add_blog_checkbox()
+
+=item has_discussion()
+
+=item sort_filter_names()
+
+=item handler()
+
+=item blocked_reply_or_edit()
+
+=item wrap_symb()
+
+=item dewrapper()
+
+=item get_feedurl()
+
+=item get_feedurl_and_clean_symb()
+
+=item editing_allowed()
+
+=item check_group_priv()
+
+=item group_args()
+
+=item get_resource_title()
+
+=back
+
+=cut
+
package Apache::lonfeedback;
use strict;
Index: loncom/interface/loncreatecourse.pm
diff -u loncom/interface/loncreatecourse.pm:1.111 loncom/interface/loncreatecourse.pm:1.112
--- loncom/interface/loncreatecourse.pm:1.111 Tue Nov 11 16:40:43 2008
+++ loncom/interface/loncreatecourse.pm Tue Nov 18 19:14:22 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Create a course
#
-# $Id: loncreatecourse.pm,v 1.111 2008/11/11 16:40:43 jms Exp $
+# $Id: loncreatecourse.pm,v 1.112 2008/11/18 19:14:22 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -39,33 +39,21 @@
This is part of the LearningOnline Network with CAPA project
described at http://www.lon-capa.org.
-=head1 HANDLER SUBROUTINE
-
-handler()
-
-=head1 OTHER SUBROUTINES
+=head1 SUBROUTINES
=over
-=item *
-
-print_course_creation_page()
-
-=item *
-
-create_course()
-
-=item *
+=item handler()
-print_intro_page()
+=item print_course_creation_page()
-=item *
+=item create_course()
-upload_batchfile()
+=item print_intro_page()
-=item *
+=item upload_batchfile()
-process_batchfile()
+=item process_batchfile()
=back
Index: loncom/homework/outputtags.pm
diff -u loncom/homework/outputtags.pm:1.52 loncom/homework/outputtags.pm:1.53
--- loncom/homework/outputtags.pm:1.52 Fri Nov 14 21:27:17 2008
+++ loncom/homework/outputtags.pm Tue Nov 18 19:14:28 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# tags that create controlled output
#
-# $Id: outputtags.pm,v 1.52 2008/11/14 21:27:17 jms Exp $
+# $Id: outputtags.pm,v 1.53 2008/11/18 19:14:28 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -38,49 +38,31 @@
This is part of the LearningOnline Network with CAPA project
described at http://www.lon-capa.org.
-=head1 HANDLER SUBROUTINE
-
-start_displayduedate()
-
-=head1 OTHER SUBROUTINES
+=head1 SUBROUTINES
=over
-=item *
-
-initialize_outputtags() : Empties the hash of tags that have already been displayed that should only be displayed once.
-
-=item *
-
-end_displayduedate()
-
-=item *
-
-start_displaytitle()
-
-=item *
-
-end_displaytitle()
+=item start_displayduedate()
-=item *
+=item initialize_outputtags()
-multipart()
+Empties the hash of tags that have already been displayed that should only be displayed once.
-=item *
+=item end_displayduedate()
-start_displayweight()
+=item start_displaytitle()
-=item *
+=item end_displaytitle()
-end_displayweight()
+=item multipart()
-=item *
+=item start_displayweight()
-start_displaystudentphoto()
+=item end_displayweight()
-=item *
+=item start_displaystudentphoto()
-end_displaystudentphoto()
+=item end_displaystudentphoto()
=back
Index: loncom/homework/edit.pm
diff -u loncom/homework/edit.pm:1.117 loncom/homework/edit.pm:1.118
--- loncom/homework/edit.pm:1.117 Mon Nov 10 14:11:16 2008
+++ loncom/homework/edit.pm Tue Nov 18 19:14:28 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# edit mode helpers
#
-# $Id: edit.pm,v 1.117 2008/11/10 14:11:16 jms Exp $
+# $Id: edit.pm,v 1.118 2008/11/18 19:14:28 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -44,102 +44,87 @@
This is part of the LearningOnline Network with CAPA project
described at http://www.lon-capa.org.
-=head1 HANDLER SUBROUTINE
-
-There is no handler subroutine.
-
-=head1 OTHER SUBROUTINES
+=head1 SUBROUTINES
=over 4
-=item *
+=item initialize_edit()
-initialize_edit() : initialize edit (set colordepth to zero)
+initialize edit (set colordepth to zero)
-=item *
+=item tag_start($target,$token,$description)
-tag_start($target,$token,$description) : provide deletion and insertion lists
+provide deletion and insertion lists
for the manipulation of a start tag; return a scalar string
-=item *
+=item tag_end($target,$token,$description)
-tag_end($target,$token,$description) : ending syntax corresponding to
+ending syntax corresponding to
&tag_start. return a scalar string.
-=item *
+=item start_table($token)
-start_table($token) : start table; update colordepth; return scalar string.
+start table; update colordepth; return scalar string.
-=item *
+=item end_table()
-end_table() : reduce color depth; end table; return scalar string
+reduce color depth; end table; return scalar string
-=item *
+=item start_spanning_row()
-start_spanning_row() : start a new table row spanning the 'edit' environment.
+start a new table row spanning the 'edit' environment.
-=item *
+=item start_row()
-start_row() : start a new table row and element.
+start a new table row and element.
-=item *
+=item end_row()
-end_row() : end current table element and row.
+end current table element and row.
-=item *
+=item movebuttons($target,$token)
-movebuttons($target,$token) : move-up and move-down buttons; return scalar
-string
+move-up and move-down buttons; return scalar string
-=item *
+=item deletelist($target,$token)
-deletelist($target,$token) : provide a yes option in an HTML select element;
-return scalar string
+provide a yes option in an HTML select element; return scalar string
-=item *
+=item handle_delete($space,$target,$token,$tagstack,$parstack,$parser,$safeeval,
+$style)
-handle_delete($space,$target,$token,$tagstack,$parstack,$parser,$safeeval,
-$style) : respond to a user delete request by passing relevant stack
+respond to a user delete request by passing relevant stack
and array information to various rendering functions; return a scalar string
-=item *
+=item get_insert_list($token)
-get_insert_list($token) : provide an insertion list based on possibilities
-from lonxml; return a scalar string
+provide an insertion list based on possibilities from lonxml; return a scalar string
-=item *
+=item insertlist($target,$token)
-insertlist($target,$token) : api that uses get_insert_list;
-return a scalar string
+api that uses get_insert_list; return a scalar string
-=item *
+=item handleinsert($token)
-handleinsert($token) : provide an insertion list based on possibilities
-from lonxml; return a scalar string
+provide an insertion list based on possibilities from lonxml; return a scalar string
-=item *
+=item get_insert_list($token)
-get_insert_list($token) : provide an insertion list based on possibilities
-from lonxml; return a scalar string
+provide an insertion list based on possibilities from lonxml; return a scalar string
-=item *
-browse($elementname) : provide a link which will open up the filesystem
-browser (lonindexer) and, once a file is selected, place the result in
-the form element $elementname.
+=item browse($elementname)
-=item *
-search($elementname) : provide a link which will open up the filesystem
-searcher (lonsearchcat) and, once a file is selected, place the result in
-the form element $elementname.
+provide a link which will open up the filesystem browser (lonindexer) and, once a file is selected, place the result in the form element $elementname.
-=item *
-editline(tag,data,description,size): Provide a <input type="text" ../> for
-single-line text entry. This is to be used for text enclosed by tags, not
-arguements/parameters associated with a tag.
+=item search($elementname)
-=back
+provide a link which will open up the filesystem searcher (lonsearchcat) and, once a file is selected, place the result in the form element $elementname.
-incomplete...
+=item editline(tag,data,description,size)
+
+Provide a <input type="text" ../> for single-line text entry. This is to be used for text enclosed by tags, not arguements/parameters associated with a tag.
+
+=back
=cut
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.529 loncom/homework/grades.pm:1.530
--- loncom/homework/grades.pm:1.529 Tue Nov 11 16:40:47 2008
+++ loncom/homework/grades.pm Tue Nov 18 19:14:28 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# The LON-CAPA Grading handler
#
-# $Id: grades.pm,v 1.529 2008/11/11 16:40:47 jms Exp $
+# $Id: grades.pm,v 1.530 2008/11/18 19:14:28 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -83,14 +83,11 @@
ssi_with_retries()
-=head1 OTHER SUBROUTINES
+=head1 SUBROUTINES
=over
-=item *
-
-
-scantron_get_correction() :
+=item scantron_get_correction() :
Builds the interface screen to interact with the operator to fix a
specific error condition in a specific scanline
@@ -116,9 +113,7 @@
- missingbubble - array ref of the bubble lines that have missing
bubble errors
-=item *
-
-scantron_get_maxbubble() :
+=item scantron_get_maxbubble() :
Returns the maximum number of bubble lines that are expected to
occur. Does this by walking the selected sequence rendering the
@@ -135,17 +130,13 @@
(for optionresponse, matchresponse, and rankresponse items), for response n.
-=item *
-
-scantron_validate_missingbubbles() :
+=item scantron_validate_missingbubbles() :
Validates all scanlines in the selected file to not have any
answers that don't have bubbles that have not been verified
to be bubble free.
-=item *
-
-scantron_process_students() :
+=item scantron_process_students() :
Routine that does the actual grading of the bubble sheet information.
@@ -165,36 +156,26 @@
of converting the bubbled letter information (now in %env) into a
valid submission.
-=item *
-
-scantron_upload_scantron_data() :
+=item scantron_upload_scantron_data() :
Creates the screen for adding a new bubble sheet data file to a course.
-=item *
-
-scantron_upload_scantron_data_save() :
+=item scantron_upload_scantron_data_save() :
Adds a provided bubble information data file to the course if user
has the correct privileges to do so.
-=item *
-
-valid_file() :
+=item valid_file() :
Validates that the requested bubble data file exists in the course.
-=item *
-
-scantron_download_scantron_data() :
+=item scantron_download_scantron_data() :
Shows a list of the three internal files (original, corrected,
skipped) for a specific bubble sheet data file that exists in the
course.
-=item *
-
-scantron_validate_ID() :
+=item scantron_validate_ID() :
Validates all scanlines in the selected file to not have any
invalid or underspecified student IDs
Index: loncom/homework/optionresponse.pm
diff -u loncom/homework/optionresponse.pm:1.154 loncom/homework/optionresponse.pm:1.155
--- loncom/homework/optionresponse.pm:1.154 Wed Nov 12 20:32:29 2008
+++ loncom/homework/optionresponse.pm Tue Nov 18 19:14:28 2008
@@ -1,7 +1,7 @@
# LearningOnline Network with CAPA
# option list style responses
#
-# $Id: optionresponse.pm,v 1.154 2008/11/12 20:32:29 jms Exp $
+# $Id: optionresponse.pm,v 1.155 2008/11/18 19:14:28 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -47,86 +47,45 @@
=over
-=item *
+=item end_optionresponse()
-end_optionresponse()
+=item start_foilgroup()
-=item *
+=item end_foilgroup()
-start_foilgroup()
+=item getfoilcounts()
-=item *
+=item displayanswers()
-end_foilgroup()
+=item check_for_invalid()
-=item *
+=item displayfoils()
-getfoilcounts()
+=item optionlist_correction()
-=item *
+=item webbubbles()
-displayanswers()
+=item bubbles()
-=item *
+=item start_conceptgroup()
-check_for_invalid()
+=item end_conceptgroup()
-=item *
+=item insert_conceptgroup()
-displayfoils()
+=item start_foil()
-=item *
+=item end_foil()
-optionlist_correction()
+=item start_drawoptionlist()
-=item *
+=item end_drawoptionlist()
-webbubbles()
+=item insert_foil()
-=item *
+=item insert_drawoptionlist()
-bubbles()
-
-=item *
-
-start_conceptgroup()
-
-=item *
-
-end_conceptgroup()
-
-=item *
-
-insert_conceptgroup()
-
-
-=item *
-
-start_foil()
-
-=item *
-
-end_foil()
-
-=item *
-
-start_drawoptionlist()
-
-=item *
-
-end_drawoptionlist()
-
-=item *
-
-insert_foil()
-
-=item *
-
-insert_drawoptionlist()
-
-=item *
-
-=back
+=item =back
=cut
Index: loncom/homework/imageresponse.pm
diff -u loncom/homework/imageresponse.pm:1.95 loncom/homework/imageresponse.pm:1.96
--- loncom/homework/imageresponse.pm:1.95 Wed Nov 12 20:01:21 2008
+++ loncom/homework/imageresponse.pm Tue Nov 18 19:14:28 2008
@@ -2,7 +2,7 @@
# The LearningOnline Network with CAPA
# image click response style
#
-# $Id: imageresponse.pm,v 1.95 2008/11/12 20:01:21 jms Exp $
+# $Id: imageresponse.pm,v 1.96 2008/11/18 19:14:28 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -41,134 +41,69 @@
This is part of the LearningOnline Network with CAPA project
described at http://www.lon-capa.org.
-=head1 HANDLER SUBROUTINE
-
-
-
-=head1 OTHER SUBROUTINES
+=head1 SUBROUTINES
=over
-=item *
-
-start_imageresponse()
-
-=item *
-
-end_imageresponse()
-
-=item *
-
-start_foilgroup()
-
-=item *
-
-getfoilcounts()
-
-=item *
-
-whichfoils()
-
-=item *
-
-prep_image()
-
-=item *
-
-draw_image()
-
-=item *
-
-displayfoils()
-
-=item *
-
-format_prior_response()
-
-=item *
-
-display_answers()
-
-=item *
-
-clean_up_image()
-
-=item *
-
-gradefoils()
-
-=item *
-
-stringify_submission()
-
-=item *
-
-get_submission()
-
-=item *
-
-end_foilgroup()
-
-=item *
-
-start_conceptgroup()
+=item start_imageresponse()
-=item *
+=item end_imageresponse()
-end_conceptgroup()
+=item start_foilgroup()
-=item *
+=item getfoilcounts()
-insert_foil()
+=item whichfoils()
-=item *
+=item prep_image()
-start_foil()
+=item draw_image()
-=item *
+=item displayfoils()
-end_foil()
+=item format_prior_response()
-=item *
+=item display_answers()
-start_text()
+=item clean_up_image()
-=item *
+=item gradefoils()
-end_text()
+=item stringify_submission()
-=item *
+=item get_submission()
-start_image()
+=item end_foilgroup()
+=item start_conceptgroup()
-=item *
+=item end_conceptgroup()
-end_image()
+=item insert_foil()
-=item *
+=item start_foil()
-start_rectangle()
+=item end_foil()
-=item *
+=item start_text()
-grade_rectangle()
+=item end_text()
-=item *
+=item start_image()
-end_rectangle()
+=item end_image()
-=item *
+=item start_rectangle()
-start_polygon()
+=item grade_rectangle()
-=item *
+=item end_rectangle()
-grade_polygon()
+=item start_polygon()
-=item *
+=item grade_polygon()
-end_polygon()
+=item end_polygon()
=back
Index: loncom/homework/randomlabel.pm
diff -u loncom/homework/randomlabel.pm:1.91 loncom/homework/randomlabel.pm:1.92
--- loncom/homework/randomlabel.pm:1.91 Wed Mar 12 02:46:53 2008
+++ loncom/homework/randomlabel.pm Tue Nov 18 19:14:28 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# random labelling tool
#
-# $Id: randomlabel.pm,v 1.91 2008/03/12 02:46:53 raeburn Exp $
+# $Id: randomlabel.pm,v 1.92 2008/11/18 19:14:28 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -53,6 +53,7 @@
# (32,65) : $GroupTwo[1] = "TEXT-1"
# (21,54) : $GroupTwo[2] = "TEXT-2"
# ===========================================
+
package Apache::randomlabel;
use Apache::lonnet;
use strict;
Index: loncom/homework/radiobuttonresponse.pm
diff -u loncom/homework/radiobuttonresponse.pm:1.137 loncom/homework/radiobuttonresponse.pm:1.138
--- loncom/homework/radiobuttonresponse.pm:1.137 Fri Nov 14 21:27:17 2008
+++ loncom/homework/radiobuttonresponse.pm Tue Nov 18 19:14:28 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# mutliple choice style responses
#
-# $Id: radiobuttonresponse.pm,v 1.137 2008/11/14 21:27:17 jms Exp $
+# $Id: radiobuttonresponse.pm,v 1.138 2008/11/18 19:14:28 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -37,53 +37,31 @@
This is part of the LearningOnline Network with CAPA project
described at http://www.lon-capa.org.
-=head1 HANDLER SUBROUTINE
-
-start_radiobuttonresponse()
-
-=head1 OTHER SUBROUTINES
+=head1 SUBROUTINES
=over
-=item *
-
-bubble_line_count()
-
-=item *
-
-end_radiobuttonresponse()
-
-=item *
-
-start_foilgroup()
-
-=item *
-
-storesurvey()
-
-=item *
+=item start_radiobuttonresponse()
-grade_response()
+=item bubble_line_count()
-=item *
+=item end_radiobuttonresponse()
-end_foilgroup()
+=item start_foilgroup()
-=item *
+=item storesurvey()
-getfoilcounts()
+=item grade_response()
-=item *
+=item end_foilgroup()
-format_prior_answer()
+=item getfoilcounts()
-=item *
+=item format_prior_answer()
-displayallfoils()
+=item displayallfoils()
-=item *
-
-&whichfoils($max,$randomize)
+=item &whichfoils($max,$randomize)
Randomizes the list of foils.
Respects
@@ -107,41 +85,23 @@
$answer - location in the array of the correct answer
@foils - array of foil names in to display order
-=item *
-
-displayfoils()
-
-=item *
-
-displayallanswers()
-
-=item *
-
-displayanswers()
-
-=item *
-
-start_conceptgroup()
-
-=item *
-
-end_conceptgroup()
+=item displayfoils()
-=item *
+=item displayallanswers()
-insert_conceptgroup()
+=item displayanswers()
-=item *
+=item start_conceptgroup()
-start_foil()
+=item end_conceptgroup()
-=item *
+=item insert_conceptgroup()
-end_foil()
+=item start_foil()
-=item *
+=item end_foil()
-insert_foil()
+=item insert_foil()
=back
Index: loncom/auth/localauth.pm
diff -u loncom/auth/localauth.pm:1.6 loncom/auth/localauth.pm:1.7
--- loncom/auth/localauth.pm:1.6 Fri Nov 7 17:52:45 2008
+++ loncom/auth/localauth.pm Tue Nov 18 19:14:34 2008
@@ -1,6 +1,6 @@
# The LON-CAPA dummy localauthentication mechnism
#
-# $Id: localauth.pm,v 1.6 2008/11/07 17:52:45 jms Exp $
+# $Id: localauth.pm,v 1.7 2008/11/18 19:14:34 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -30,7 +30,7 @@
=head1 NAME
-localauth
+Apache::localauth
=head1 SYNOPSIS
Index: loncom/auth/lonacc.pm
diff -u loncom/auth/lonacc.pm:1.118 loncom/auth/lonacc.pm:1.119
--- loncom/auth/lonacc.pm:1.118 Sun Nov 16 02:46:19 2008
+++ loncom/auth/lonacc.pm Tue Nov 18 19:14:34 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Cookie Based Access Handler
#
-# $Id: lonacc.pm,v 1.118 2008/11/16 02:46:19 raeburn Exp $
+# $Id: lonacc.pm,v 1.119 2008/11/18 19:14:34 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -27,6 +27,69 @@
#
###
+=head1 NAME
+
+Apache::lonacc - Cookie Based Access Handler
+
+=head1 SYNOPSIS
+
+Invoked (for various locations) by /etc/httpd/conf/srm.conf:
+
+ PerlAccessHandler Apache::lonacc
+
+=head1 INTRODUCTION
+
+This module enables cookie based authentication and is used
+to control access for many different LON-CAPA URIs.
+
+Whenever the client sends the cookie back to the server,
+this cookie is handled by either lonacc.pm or loncacc.pm
+(see srm.conf for what is invoked when). If
+the cookie is missing or invalid, the user is re-challenged
+for login information.
+
+This is part of the LearningOnline Network with CAPA project
+described at http://www.lon-capa.org.
+
+=head1 HANDLER SUBROUTINE
+
+This routine is called by Apache and mod_perl.
+
+=over 4
+
+=item *
+
+transfer profile into environment
+
+=item *
+
+load POST parameters
+
+=item *
+
+check access
+
+=item *
+
+if allowed, get symb, log, generate course statistics if applicable
+
+=item *
+
+otherwise return error
+
+=item *
+
+see if public resource
+
+=item *
+
+store attempted access
+
+=back
+
+=cut
+
+
package Apache::lonacc;
use strict;
@@ -459,65 +522,3 @@
1;
__END__
-
-=head1 NAME
-
-Apache::lonacc - Cookie Based Access Handler
-
-=head1 SYNOPSIS
-
-Invoked (for various locations) by /etc/httpd/conf/srm.conf:
-
- PerlAccessHandler Apache::lonacc
-
-=head1 INTRODUCTION
-
-This module enables cookie based authentication and is used
-to control access for many different LON-CAPA URIs.
-
-Whenever the client sends the cookie back to the server,
-this cookie is handled by either lonacc.pm or loncacc.pm
-(see srm.conf for what is invoked when). If
-the cookie is missing or invalid, the user is re-challenged
-for login information.
-
-This is part of the LearningOnline Network with CAPA project
-described at http://www.lon-capa.org.
-
-=head1 HANDLER SUBROUTINE
-
-This routine is called by Apache and mod_perl.
-
-=over 4
-
-=item *
-
-transfer profile into environment
-
-=item *
-
-load POST parameters
-
-=item *
-
-check access
-
-=item *
-
-if allowed, get symb, log, generate course statistics if applicable
-
-=item *
-
-otherwise return error
-
-=item *
-
-see if public resource
-
-=item *
-
-store attempted access
-
-=back
-
-=cut
Index: loncom/publisher/lonupload.pm
diff -u loncom/publisher/lonupload.pm:1.39 loncom/publisher/lonupload.pm:1.40
--- loncom/publisher/lonupload.pm:1.39 Mon Nov 10 13:20:04 2008
+++ loncom/publisher/lonupload.pm Tue Nov 18 19:14:40 2008
@@ -2,7 +2,7 @@
# The LearningOnline Network with CAPA
# Handler to upload files into construction space
#
-# $Id: lonupload.pm,v 1.39 2008/11/10 13:20:04 jms Exp $
+# $Id: lonupload.pm,v 1.40 2008/11/18 19:14:40 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -83,30 +83,30 @@
=head1 OTHER SUBROUTINES
-=over 4
+=over
-=item *
+=item phaseone()
-phaseone() : Interface for specifying file to upload.
+Interface for specifying file to upload.
-=item *
+=item phasetwo()
-phasetwo() : Interface for handling post-conditions about uploading (such
+Interface for handling post-conditions about uploading (such
as overwriting an existing file).
-=item *
+=item phasethree()
-phasethree() : Interface for handling secondary uploads of embedded objects
+Interface for handling secondary uploads of embedded objects
in an html file.
-=item *
+=item upfile_store()
-upfile_store() : Store contents of uploaded file into temporary space. Invoked
+Store contents of uploaded file into temporary space. Invoked
by phaseone subroutine.
-=item *
+=item check_extension()
-check_extension() : Checks if filename extension is permitted and checks type
+Checks if filename extension is permitted and checks type
of file - if html file, calls parser to check for embedded objects.
Invoked by phasetwo subroutine.
--jms1227035681--