Changeset 9465 for trunk/gsdl/perllib/plugins/WordPlug.pm
- Timestamp:
- 2005-03-18T14:10:58+13:00 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/plugins/WordPlug.pm
r6408 r9465 74 74 sub process { 75 75 my $self = shift (@_); 76 #my ($textref, $pluginfo, $base_dir, $file, $metadata, $doc_obj, $gli) = @_; 76 77 77 my $outhandle = $self->{'outhandle'}; 78 my $outhandle = $self->{'outhandle'}; 78 79 print $outhandle "WordPlug: passing $_[3] on to $self->{'converted_to'}Plug\n" 79 80 if $self->{'verbosity'} > 1; 80 81 print STDERR "<Processing n='$_[3]' p='WordPlug'>\n" if ($_[6]); 82 81 83 return ConvertToPlug::process_type($self,"doc",@_); 82 84 }
Note:
See TracChangeset
for help on using the changeset viewer.