Changeset 2515 for trunk/gsdl/perllib/plugins/WordPlug.pm

Timestamp:

2001-06-11T12:15:21+12:00 (23 years ago)

Author:

sjboddie

Message:

Fixed a couple of bugs/inconsistencies in word and pdf plugins that
affected their behaviour under the collector

File:

• trunk/gsdl/perllib/plugins/WordPlug.pm (modified) (2 diffs)

trunk/gsdl/perllib/plugins/WordPlug.pm

@@ -32 +32 @@
 }
 
-use strict;
-
-
 sub get_default_process_exp {
     my $self = shift (@_);
@@ -46 +43 @@
 sub process {
     my $self = shift (@_);
-    
-    print STDERR "WordPlug: passing $_[3] onto $self->{'convert_to'} Plug\n" 
+
+    my $outhandle = $self->{'outhandle'};    
+    print $outhandle "WordPlug: passing $_[3] onto $self->{'convert_to'} Plug\n" 
     if $self->{'verbosity'} > 1;