Changeset 22705 for main/trunk/greenstone2/perllib/plugins/AutoloadConverterScripting.pm

Timestamp:

2010-08-21T23:30:28+12:00 (14 years ago)

Author:

davidb

Message:

User of AutoloadConverterScripting expanded to encompass PowerPoint and Excel. No longer need OOConvertBinaryFile and PBConvertBinaryFile

File:

• main/trunk/greenstone2/perllib/plugins/AutoloadConverterScripting.pm (modified) (2 diffs)

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

@@ -73 +73 @@
 
 ####
-# This plugin takes an extra initial parameter in its constructor (compared with
-#   the norm).  The extra parameter specifies which plugin it should try to
-#   dynamically load
+# This plugin takes an extra initial parameter in its constructor (compared 
+#   with the norm).  The extra parameter specifies which plugin it should 
+#   try to dynamically load
 #####
 
@@ -87 +87 @@
     my $autoVar  = $dynamic_self->{'_autoVar'};
 
-#    print STDERR "**** autoload NEW autoVar = $dynamic_self->{'_autoVar'}\n";
-#    print STDERR "**** working ", $dynamic_self->{'scripting_ext_working} , "\n";
+    if ($dynamic_self->{'scripting_ext_installed'}) {
+    my ($cpackage,$cfilename,$cline,$csubr,$chas_args,$cwantarray) = caller(0);
 
-    if ($dynamic_self->{'scripting_ext_installed'}) {
-    print STDERR "$class: $autoName Extension to Greenstone detected\n";
+    print STDERR "$class: $autoName Extension to Greenstone detected for $cpackage\n";
     if ($dynamic_self->{'scripting_ext_working'}) {
         # print STDERR "... and it appears to be working\n";