Changeset 32580 for main/trunk/greenstone2/perllib/plugins/GreenstoneSQLPlugin.pm

Timestamp:

2018-11-07T18:39:13+13:00 (5 years ago)

Author:

ak19

Message:

1. support for port param when connecting to SQL DB. 2. GS SQL Plugout now also uses the verbosity member variable when instantiating the gssql object. 3. Since the DBI object has PrintError set to 1 on connection (and ShowErrorStatement set to 1 to for more verbosity), which means an informative message is always printed on error or warning, there's no need for me to right warning statements everywhere when a db statement/call fails. Removed these redundant warnings. 4. Don't want GS XML Plugout's debug outhandle passed to the two gssql::insert methods, as we don't want them to write debug information to the debug handle. That should only be for the XML stuff (whether groups on or not), and the debug outhandle can moreover be set to the XSLT writer, concerning which makes it makes even less sense for gssql to output info and error debug statements into there. gssql now sticks to STDERR for debug information.

File:

• main/trunk/greenstone2/perllib/plugins/GreenstoneSQLPlugin.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/plugins/GreenstoneSQLPlugin.pm

@@ -427 +427 @@
     my $gs_sql = new gssql({
     'collection_name' => $ENV{'GSDLCOLLECTION'},
-    'verbosity' => $self->{'verbosity'}
+    'verbosity' => $self->{'verbosity'} || 0
                });