Bug 24883: Add POD entry and remove unused variable

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

diff --git a/C4/Installer.pm b/C4/Installer.pm
index ec56c0e..db247e5 100644 (file)
--- a/C4/Installer.pm
+++ b/C4/Installer.pm
@@ -473,15 +473,12 @@ sub set_languages_syspref {
     C4::Context->clear_syspref_cache();
 }
 
-=head2 load_sql
-
-  my $error = $installer->load_sql($filename);
+=head2 process_yml_table
 
-Runs the specified input file using a sql loader DBIx::RunSQL, or a yaml loader
-Returns any strings sent to STDERR
+  my $query_info   = $installer->process_yml_table($table);
 
-# FIXME This should be improved: sometimes the caller and load_sql warn the same
-error.
+Analyzes a table loaded in YAML format.
+Returns the values required to build an insert statement.
 
 =cut
 
@@ -506,6 +503,18 @@ sub process_yml_table {
     return { query => $query, placeholders => $placeholders, values => \@values };
 }
 
+=head2 load_sql
+
+  my $error = $installer->load_sql($filename);
+
+Runs the specified input file using a sql loader DBIx::RunSQL, or a yaml loader
+Returns any strings sent to STDERR
+
+# FIXME This should be improved: sometimes the caller and load_sql warn the same
+error.
+
+=cut
+
 sub load_sql {
     my $self = shift;
     my $filename = shift;

diff --git a/misc/load_yaml.pl b/misc/load_yaml.pl
index b12d88d..118c394 100755 (executable)
--- a/misc/load_yaml.pl
+++ b/misc/load_yaml.pl
@@ -41,7 +41,7 @@ USAGE
 }
 
 # Getting parameters
-my ( @files, $dump, $load, $help );
+my ( @files, $load, $help );
 
 GetOptions(
  'help|h'        => \$help,