[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm

matthew lon-capa-cvs@mail.lon-capa.org
Tue, 09 Jul 2002 17:15:58 -0000


matthew		Tue Jul  9 13:15:58 2002 EDT

  Modified files:              
    /loncom/interface	loncommon.pm 
  Log:
  POD changes to fix bug in "make build;".  There were two errors:  An =item 
  appeared outside of an =over list and an =head2 appeared inside an =over list.
  Added =pod to a few places that should likely have it (not having it does not
  generate an error).  Added a few newlines after POD commands, too.
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.44 loncom/interface/loncommon.pm:1.45
--- loncom/interface/loncommon.pm:1.44	Fri Jul  5 12:12:31 2002
+++ loncom/interface/loncommon.pm	Tue Jul  9 13:15:58 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.44 2002/07/05 16:12:31 bowersj2 Exp $
+# $Id: loncommon.pm,v 1.45 2002/07/09 17:15:58 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -41,6 +41,8 @@
 
 # POD header:
 
+=pod
+
 =head1 NAME
 
 Apache::loncommon - pile of common routines
@@ -105,9 +107,10 @@
 =item BEGIN() 
 
 Initialize values from language.tab, copyright.tab, filetypes.tab,
-and filecategories.tab.
+thesaurus.tab, and filecategories.tab.
 
 =cut
+
 # ----------------------------------------------------------------------- BEGIN
 
 BEGIN {
@@ -342,8 +345,6 @@
                   }
               );
 
-=back
-
 =cut
 
 # ------------------------------------------------
@@ -428,6 +429,7 @@
 
 ###############################################################
 
+=pod
 
 =item help_open_topic($topic, $stayOnPage, $width, $height)
 
@@ -471,6 +473,8 @@
 
 }
 
+=pod
+
 =item csv_translate($text) 
 
 Translate $text to allow it to be output as a 'comma seperated values' 
@@ -492,6 +496,8 @@
 ###############################################################
 #-------------------------------------------
 
+=pod
+
 =item get_domains()
 
 Returns an array containing each of the domains listed in the hosts.tab
@@ -512,6 +518,8 @@
 
 #-------------------------------------------
 
+=pod
+
 =item select_dom_form($defdom,$name)
 
 Returns a string containing a <select name='$name' size='1'> form to 
@@ -536,6 +544,8 @@
 
 #-------------------------------------------
 
+=pod
+
 =item get_home_servers($domain)
 
 Returns a hash which contains keys like '103l3' and values like 
@@ -558,6 +568,8 @@
 
 #-------------------------------------------
 
+=pod
+
 =item home_server_option_list($domain)
 
 returns a string which contains an <option> list to be used in a 
@@ -590,6 +602,8 @@
 ##    formname = the name given in the <form> tag.
 #-------------------------------------------
 
+=pod
+
 =item authform_xxxxxx
 
 The authform_xxxxxx subroutines provide javascript and html forms which 
@@ -1078,6 +1092,8 @@
 }
 
 =pod
+
+=back 
 
 =head2 CSV Upload/Handling functions