45 |
my $name = $self->get_name(); |
my $name = $self->get_name(); |
46 |
my $group = $self->get_tag('group'); |
my $group = $self->get_tag('group'); |
47 |
|
|
48 |
# debug packages' names must end in -debug |
# debug packages' names must end in -debug or -debuginfo |
49 |
if ($group =~ m,^Development/Debug$, && |
if ($group =~ m,^Development/Debug$, && |
50 |
($name =~ /-debug$/o || $name =~ /-debuginfo$/o || $name =~ /^kernel-.*-debug/o)) { |
($name =~ /-debug$/o || $name =~ /-debuginfo$/o)) { |
51 |
return 1; |
return 1; |
52 |
} |
} |
53 |
else { |
else { |