diff options
| -rw-r--r-- | debian/changelog | 1 | ||||
| -rw-r--r-- | scripts/Dpkg/Substvars.pm | 21 |
2 files changed, 6 insertions, 16 deletions
diff --git a/debian/changelog b/debian/changelog index 8841b1cb2..0cf8c186d 100644 --- a/debian/changelog +++ b/debian/changelog @@ -63,6 +63,7 @@ dpkg (1.20.0) UNRELEASED; urgency=medium - Dpkg::Source::Package: Hide internal lowercase variable @tar_ignore_default_pattern. Remove iternal lowercase variable alias $diff_ignore_default_regexp. + - Dpkg::Substvars: Remove obsolete no_warn() method. * Documentation: - man: Fix uncommon wording constructs. - man: Use a minus sign for a literal string. diff --git a/scripts/Dpkg/Substvars.pm b/scripts/Dpkg/Substvars.pm index d2060efc5..49ebd902b 100644 --- a/scripts/Dpkg/Substvars.pm +++ b/scripts/Dpkg/Substvars.pm @@ -19,7 +19,7 @@ package Dpkg::Substvars; use strict; use warnings; -our $VERSION = '1.06'; +our $VERSION = '2.00'; use Dpkg (); use Dpkg::Arch qw(get_host_arch); @@ -168,21 +168,6 @@ sub mark_as_used { $self->{attr}{$key} |= SUBSTVAR_ATTR_USED; } -=item $s->no_warn($key) - -Obsolete function, use mark_as_used() instead. - -=cut - -sub no_warn { - my ($self, $key) = @_; - - warnings::warnif('deprecated', - 'obsolete no_warn() function, use mark_as_used() instead'); - - $self->mark_as_used($key); -} - =item $s->parse($fh, $desc) Add new substitutions read from the filehandle. $desc is used to identify @@ -438,6 +423,10 @@ indicated file. =head1 CHANGES +=head2 Version 2.00 (dpkg 1.20.0) + +Remove method: $s->no_warn(). + =head2 Version 1.06 (dpkg 1.19.0) New method: $s->set_desc_substvars(). |