Index: third_party/dpkg-dev/scripts/Dpkg/Control/Changelog.pm |
diff --git a/third_party/dpkg-dev/scripts/Dpkg/Control/Changelog.pm b/third_party/dpkg-dev/scripts/Dpkg/Control/Changelog.pm |
new file mode 100644 |
index 0000000000000000000000000000000000000000..a6890ea5eeb499b8da1e9ff2dd15d6eb61e00b0a |
--- /dev/null |
+++ b/third_party/dpkg-dev/scripts/Dpkg/Control/Changelog.pm |
@@ -0,0 +1,62 @@ |
+# Copyright © 2009 Raphaël Hertzog <hertzog@debian.org> |
+ |
+# This program is free software; you can redistribute it and/or modify |
+# it under the terms of the GNU General Public License as published by |
+# the Free Software Foundation; either version 2 of the License, or |
+# (at your option) any later version. |
+ |
+# This program is distributed in the hope that it will be useful, |
+# but WITHOUT ANY WARRANTY; without even the implied warranty of |
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
+# GNU General Public License for more details. |
+ |
+# You should have received a copy of the GNU General Public License |
+# along with this program. If not, see <https://www.gnu.org/licenses/>. |
+ |
+package Dpkg::Control::Changelog; |
+ |
+use strict; |
+use warnings; |
+ |
+our $VERSION = '1.00'; |
+ |
+use Dpkg::Control; |
+use parent qw(Dpkg::Control); |
+ |
+=encoding utf8 |
+ |
+=head1 NAME |
+ |
+Dpkg::Control::Changelog - represent info fields output by dpkg-parsechangelog |
+ |
+=head1 DESCRIPTION |
+ |
+This object derives directly from Dpkg::Control with the type |
+CTRL_CHANGELOG. |
+ |
+=head1 FUNCTIONS |
+ |
+=over 4 |
+ |
+=item $c = Dpkg::Control::Changelog->new() |
+ |
+Create a new empty set of changelog related fields. |
+ |
+=cut |
+ |
+sub new { |
+ my $this = shift; |
+ my $class = ref($this) || $this; |
+ my $self = Dpkg::Control->new(type => CTRL_CHANGELOG, @_); |
+ return bless $self, $class; |
+} |
+ |
+=back |
+ |
+=head1 AUTHOR |
+ |
+Raphaël Hertzog <hertzog@debian.org>. |
+ |
+=cut |
+ |
+1; |