Changeset 22514

Show
Ignore:
Timestamp:
27.07.2010 16:06:39 (9 years ago)
Author:
kjdon
Message:

small tidyings

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/plugins/WordPlugin.pm

    r22507 r22514  
    8181my $opt_openoffice_args =  
    8282    [ { 'name' => "openoffice_scripting", 
    83     'desc' => "{WordPlugin.openoffice_scripting}", 
     83    'desc' => "{OpenOfficeConverter.openoffice_scripting}", 
    8484    'type' => "flag", 
    8585    'reqd' => "no" } ]; 
     
    160160 
    161161    my $self = {}; 
    162     my $outhandle; 
    163162 
    164163    if ($openoffice_ext_working) { 
    165164     
    166165    $self = new OpenOfficeConverter($pluginlist, $inputargs, $hashArgOptLists); 
    167     $outhandle = $self->{'outhandle'}; 
    168  
    169166    } 
    170167    else { 
    171168    $self = new ConvertBinaryFile($pluginlist, $inputargs, $hashArgOptLists); 
    172     $outhandle = $self->{'outhandle'}; 
    173169    } 
    174170 
     
    178174    } 
    179175 
     176    my $outhandle = $self->{'outhandle'}; 
    180177    $self->{'filename_extension'} = "doc"; 
    181178    $self->{'file_type'} = "Word";