Bug#789587: [debchange] please add oldstable and stable code name for distribution

[Hideki Yamane]

Package: devscripts
Severity: wishlist
Tags: patch

Hi,

 Probably it'd be better to add wheezy and jessie as distribuion.
 

diff --git a/scripts/debchange.pl b/scripts/debchange.pl
index 2bad684..5bece42 100755
--- a/scripts/debchange.pl
+++ b/scripts/debchange.pl
@@ -471,8 +471,10 @@ if ($vendor eq 'Ubuntu' and ($opt_n or $opt_bn or $opt_qa or $opt_bpo)) {
 # Check the distro name given.
 if (defined $opt_D) {
     if ($vendor eq 'Debian') {
-       unless ($opt_D =~ /^(experimental|unstable|UNRELEASED|((old)?stable|testing)(-proposed-updates|-security)?|proposed-updates)$/) {
-           my $deb_info = get_debian_distro_info();
+       my $deb_info = get_debian_distro_info();
+       my $oldstable = $deb_info->old();
+       my $stable = $deb_info->stable();
+       unless ($opt_D =~ /^(experimental|unstable|UNRELEASED|$oldstable|$stable|((old)?stable|testing)(-proposed-updates|-security)?|proposed-updates)$/) {
            my ($oldstable_backports, $stable_backports) = ("", "");
            if ($deb_info == 0) {
                warn "$progname warning: Unable to determine Debian's backport distributions.\n";
@@ -487,8 +489,9 @@ if (defined $opt_D) {
                $stable_backports = ", " . $stable_backports if $stable_backports;
                $oldstable_backports = ", " . $oldstable_backports if $oldstable_backports;
                warn "$progname warning: Recognised distributions are: unstable, testing, stable,\n"
-                    . "oldstable, experimental, {testing-,stable-,oldstable-,}proposed-updates,\n"
-                    . "{testing,stable,oldstable}-security$oldstable_backports$stable_backports and UNRELEASED.\n"
+                    . "oldstable, experimental, {testing,stable,oldstable}-proposed-updates,\n"
+                    . "{testing,stable,oldstable}-security$oldstable_backports$stable_backports,\n"
+                    . "$oldstable,$stable and UNRELEASED.\n"
                     . "Using your request anyway.\n";
                $warnings++ if not $opt_force_dist;
            }