Ticket #892: prefix.patch

File prefix.patch, 459 bytes (added by Georgiy Litvinov, 9 years ago)

Much more pretty solution

  • perllib/classify.pm 

    diff --git a/perllib/classify.pm b/perllib/classify.pm
index a740972..b448945 100644
    a b sub load_classifiers {  
    167167        #}
    168168    }
    169169
    170     map { $_ = "\"$_\""; } @newoptions;
    171     my $options .= join (",", @newoptions);
    172 
    173 
    174     eval ("\$classobj = new \$classname([],[$options])");
     170    eval ("\$classobj = new \$classname([],[\@newoptions])");
    175171    die "$@" if $@;
    176172
    177173    $classobj->set_number($classify_number);