Changeset 25803


Ignore:
Timestamp:
2012-06-20T16:56:03+12:00 (12 years ago)
Author:
ak19
Message:

Bugfix to issue detected during the testing of the PDFCollection tutorial with GS3: the collectionconfig.xml contains quotes around the process_exp value which then results in a set of double quotes by the time plugin.pm calls the PDFPlugin with eval. This call then fails because of the contiguous quotation marks.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/plugin.pm

    r24345 r25803  
    180180    # create a plugin object
    181181    my ($plugobj);
    182     map { $_ = "\"$_\""; } @$pluginoptions;
     182    # put quotes around each option to the plugin, unless the option is already quoted
     183    map { $_ = "\"$_\"" unless ($_ =~ m/^\s*\".*\"\s*$/) ; } @$pluginoptions;
    183184    my $options = join (",", @$pluginoptions);
    184185    if ($globals) {
Note: See TracChangeset for help on using the changeset viewer.