[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm
albertel
lon-capa-cvs-allow@mail.lon-capa.org
Wed, 11 Jul 2007 20:37:53 -0000
albertel Wed Jul 11 16:37:53 2007 EDT
Modified files:
/loncom/interface loncommon.pm
Log:
- fixup the pod to display correctly, add in some sub section headers
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.548 loncom/interface/loncommon.pm:1.549
--- loncom/interface/loncommon.pm:1.548 Wed Jul 11 16:32:15 2007
+++ loncom/interface/loncommon.pm Wed Jul 11 16:37:52 2007
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.548 2007/07/11 20:32:15 albertel Exp $
+# $Id: loncommon.pm,v 1.549 2007/07/11 20:37:52 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -3338,7 +3338,7 @@
=back
-=head1 HTTP Helpers
+=head1 HTML Helpers
=over 4
@@ -3632,20 +3632,12 @@
=pod
-=back
-
-=head1 HTML Helpers
-
-=over 4
-
=item * &endbodytag()
Returns a uniform footer for LON-CAPA web pages.
Inputs: none
-=back
-
=cut
sub endbodytag {
@@ -3662,8 +3654,6 @@
=pod
-=over 4
-
=item * &standard_css()
Returns a style sheet
@@ -3674,8 +3664,6 @@
function -> force usage of a specific rolish color scheme
bgcolor -> override the default page bgcolor
-=back
-
=cut
sub standard_css {
@@ -4507,8 +4495,6 @@
=pod
-=over 4
-
=item * &headtag()
Returns a uniform footer for LON-CAPA web pages.
@@ -4532,8 +4518,6 @@
no_auto_mt_title
-> prevent &mt()ing the title arg
-=back
-
=cut
sub headtag {
@@ -4589,16 +4573,12 @@
=pod
-=over 4
-
=item * &font_settings()
Returns neccessary <meta> to set the proper encoding
Inputs: none
-=back
-
=cut
sub font_settings {
@@ -4615,16 +4595,12 @@
=pod
-=over 4
-
=item * &xml_begin()
Returns the needed doctype and <html>
Inputs: none
-=back
-
=cut
sub xml_begin {
@@ -4649,16 +4625,12 @@
=pod
-=over 4
-
=item * &endheadtag()
Returns a uniform </head> for LON-CAPA web pages.
Inputs: none
-=back
-
=cut
sub endheadtag {
@@ -4667,8 +4639,6 @@
=pod
-=over 4
-
=item * &head()
Returns a uniform complete <head>..</head> section for LON-CAPA web pages.
@@ -4676,8 +4646,6 @@
Inputs: $title - optional title for the page
$head_extra - optional extra HTML to put inside the <head>
-=back
-
=cut
sub head {
@@ -4687,8 +4655,6 @@
=pod
-=over 4
-
=item * &start_page()
Returns a complete <html> .. <body> section for LON-CAPA web pages.
@@ -4727,8 +4693,6 @@
no_auto_mt_title -> prevent &mt()ing the title arg
-=back
-
=cut
sub start_page {
@@ -4780,8 +4744,6 @@
=pod
-=over 4
-
=item * &head()
Returns a complete </body></html> section for LON-CAPA web pages.
@@ -4988,6 +4950,12 @@
=pod
+=back
+
+=head1 User Information Routines
+
+=over 4
+
=item * &get_users_function()
Used by &bodytag to determine the current users primary role.
@@ -5550,6 +5518,12 @@
=pod
+=back
+
+=head1 HTTP Helpers
+
+=over 4
+
=item * get_unprocessed_cgi($query,$possible_names)
Modify the %env hash to contain unprocessed CGI form parameters held in