Changeset 22382


Ignore:
Timestamp:
07/13/10 13:18:34 (11 years ago)
Author:
kjdon
Message:

if language is ar for phind, then we set textorientation parameter to rtl.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/classify/Phind.pm

    r21876 r22382  
    190190    $self->{'total'} = 0;
    191191   
     192    # we set phind to be rtl if language is arabic
     193    if ($self->{'language'} eq "ar") {
     194    $self->{'textorientation'} = "rtl";
     195    }
    192196    # Clean out the unused keys
    193197    delete $self->{"text"};
     
    442446    &execute("mgpp_passes $osextra -f \"$mg_stem\" -T2 \"$mg_input\"", $verbosity, $out);
    443447
     448    my $parameters = "phindnumber=$self->{'phindnumber'}";
     449    if (defined ($self->{'textorientation'})) {
     450    $parameters .= ";textorientation=$self->{'textorientation'}";
     451    }
    444452    # Return the information about the classifier that we'll later want to
    445453    # use to create macros when the Phind classifier document is displayed.
     
    447455                        'childtype'=>'Phind',
    448456                        'Title'=>$self->{'buttonname'},
    449                         'parameters'=>"phindnumber=$self->{'phindnumber'}",
     457                        'parameters'=>$parameters,
    450458            'contains'=>[]);
    451459   
Note: See TracChangeset for help on using the changeset viewer.