source: main/trunk/package-kits/linux/perllib/Greenstone/Package/_rpm.pm@ 29539

package Greenstone::Package::_rpm;

use strict;
use warnings;
use utf8;
use parent 'Greenstone::Package';

sub replacement_array {
    my $self = shift;
    my $array = shift;
    return join ", ", @{$array};
}

1;