Changeset 12687

Timestamp:

2006-09-06T14:21:19+12:00 (18 years ago)

Author:

kjdon

Message:

moved 'use DBI' from the start to 'require DBI' in the read function - don't load it unless we have to. This way we can still run pluginfo.pl on DBPlug even if the module is not installed

File:

• trunk/gsdl/perllib/plugins/DBPlug.pm (modified) (3 diffs)

trunk/gsdl/perllib/plugins/DBPlug.pm

@@ -40 +40 @@
 use unicode;
 
-use DBI; # database independent stuff
+#use DBI; # database independent stuff
 
 sub BEGIN {
@@ -87 +87 @@
     my ($pluginfo, $base_dir, $file, $metadata, $processor, $maxdocs, $total_count, $gli) = @_;
 
+    
     # see if we can handle the passed file...
     my ($block_status,$filename) = $self->read_block(@_);    
@@ -96 +97 @@
     print $outhandle "DBPlug: processing $file\n" 
     if $self->{'verbosity'} > 1;
-    
+    require DBI; # database independent stuff
+
     # calculate the document hash, for document ids
     my $hash="";