1 --- rpmorphan-1.2/rpmorphan-lib.pl.orig 2008-10-18 23:04:57.476685358 +0200
2 +++ rpmorphan-1.2/rpmorphan-lib.pl 2008-10-18 23:05:06.976032491 +0200
4 my ( $key, $value ) = split /\s*=\s*/, $_, 2;
6 if ( exists $rh_list->{$key} ) {
7 - ${ $rh_list->{$key} } = $value;
8 + if (ref($rh_list->{$key}) eq 'ARRAY') {
9 + @{ $rh_list->{$key} } = get_from_command_line($value);
11 + ${ $rh_list->{$key} } = $value;
14 # special case : verbose will modify immediately behavior
15 init_debug($value) if ( $key eq 'verbose' );