[LON-CAPA-cvs] cvs: loncom /lonnet/perl lonnet.pm

albertel lon-capa-cvs@mail.lon-capa.org
Tue, 17 Oct 2006 15:15:52 -0000


albertel		Tue Oct 17 11:15:52 2006 EDT

  Modified files:              
    /loncom/lonnet/perl	lonnet.pm 
  Log:
  - move the pod to where it should be
  
  
Index: loncom/lonnet/perl/lonnet.pm
diff -u loncom/lonnet/perl/lonnet.pm:1.794 loncom/lonnet/perl/lonnet.pm:1.795
--- loncom/lonnet/perl/lonnet.pm:1.794	Tue Oct 17 01:56:46 2006
+++ loncom/lonnet/perl/lonnet.pm	Tue Oct 17 11:15:51 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.794 2006/10/17 05:56:46 albertel Exp $
+# $Id: lonnet.pm,v 1.795 2006/10/17 15:15:51 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -413,17 +413,6 @@
     return 'ok';
 }
 
-=pod
-
-=item * get_env_multiple($name) 
-
-gets $name from the %env hash, it seemlessly handles the cases where multiple
-values may be defined and end up as an array ref.
-
-returns an array of values
-
-=cut
-
 sub get_env_multiple {
     my ($name) = @_;
     my @values;
@@ -7554,6 +7543,13 @@
 environment file that matches the regular expression in $regexp. The
 values are also delted from the current processes %env.
 
+=item * get_env_multiple($name) 
+
+gets $name from the %env hash, it seemlessly handles the cases where multiple
+values may be defined and end up as an array ref.
+
+returns an array of values
+
 =back
 
 =head2 User Information