Changeset 22514 for main/trunk
- Timestamp:
- 2010-07-27T16:06:39+12:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/WordPlugin.pm
r22507 r22514 81 81 my $opt_openoffice_args = 82 82 [ { 'name' => "openoffice_scripting", 83 'desc' => "{ WordPlugin.openoffice_scripting}",83 'desc' => "{OpenOfficeConverter.openoffice_scripting}", 84 84 'type' => "flag", 85 85 'reqd' => "no" } ]; … … 160 160 161 161 my $self = {}; 162 my $outhandle;163 162 164 163 if ($openoffice_ext_working) { 165 164 166 165 $self = new OpenOfficeConverter($pluginlist, $inputargs, $hashArgOptLists); 167 $outhandle = $self->{'outhandle'};168 169 166 } 170 167 else { 171 168 $self = new ConvertBinaryFile($pluginlist, $inputargs, $hashArgOptLists); 172 $outhandle = $self->{'outhandle'};173 169 } 174 170 … … 178 174 } 179 175 176 my $outhandle = $self->{'outhandle'}; 180 177 $self->{'filename_extension'} = "doc"; 181 178 $self->{'file_type'} = "Word";
Note:
See TracChangeset
for help on using the changeset viewer.