[LON-CAPA-cvs] cvs: loncom / LONCAPA.pm

[raeburn]

raeburn		Wed May 13 14:01:10 2009 EDT

  Modified files:              
    /loncom	LONCAPA.pm 
  Log:
  - Accumulate POD at end of file.
  
  
Index: loncom/LONCAPA.pm
diff -u loncom/LONCAPA.pm:1.27 loncom/LONCAPA.pm:1.28
--- loncom/LONCAPA.pm:1.27	Thu Nov 20 15:19:33 2008
+++ loncom/LONCAPA.pm	Wed May 13 14:01:10 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Base routines
 #
-# $Id: LONCAPA.pm,v 1.27 2008/11/20 15:19:33 jms Exp $
+# $Id: LONCAPA.pm,v 1.28 2009/05/13 14:01:10 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -68,20 +68,6 @@
 my %perlvar;
 
 
-=pod
-
-=head2 NOTE:
-
-add_get_param()
-
-Inputs are a url, and a hash ref of
-form name => value pairs
-takes care of properly adding the form name elements and values to the 
-the url doing proper escaping of the values and joining with ? or & as 
-needed
-
-=cut
-
 sub add_get_param {
     my ($url,$form_data) = @_;
     my $needs_question_mark = ($url !~ /\?/);
@@ -385,6 +371,7 @@
 
 __END__
 
+=pod
 
 =head1 NAME
 
@@ -409,12 +396,14 @@
  pack CGI-compatible hex codes into actual non-word ASCII character
 
 =item  add_get_param()
+
+Append escaped form elements (name=value etc.) to a url.
  
  Inputs:  url (with or without exit GET from parameters), hash ref of
               form name => value pairs
 
- Return: url with properly added the form name elements and values to the 
-         the url doing proper escaping of the values and joining with ? or &
+ Return: url with form name elements and values appended to the 
+         the url, doing proper escaping of the values and joining with ? or &
          as needed
 
 =item clean_handle()