- my %disttags = ();
- $disttags{'oldstable'} = grep(/^etch$/, @tags);
- $disttags{'stable'} = grep(/^lenny$/, @tags);
- $disttags{'testing'} = grep(/^squeeze$/, @tags);
- $disttags{'unstable'} = grep(/^sid$/, @tags);
+ my %disttags = ();
+ for (qw(oldstable stable testing unstable)) {
+ $disttags{$_} = grep(/^$bug_cfg::debian_releases->{$_}$/, @tags);
+ }