5 files changed, 12 insertions, 2 deletions
diff --git a/scripts/Dpkg/Control/Changelog.pm b/scripts/Dpkg/Control/Changelog.pm
index 82ed18333..affa096ec 100644
--- a/scripts/Dpkg/Control/Changelog.pm
+++ b/scripts/Dpkg/Control/Changelog.pm
@@ -23,6 +23,8 @@ our $VERSION = "1.00";
 use Dpkg::Control;
 use base 'Dpkg::Control';
 
+=encoding utf8
+
 =head1 NAME
 
 Dpkg::Control::Changelog - represent info fields output by dpkg-parsechangelog
diff --git a/scripts/Dpkg/Control/Fields.pm b/scripts/Dpkg/Control/Fields.pm
index f0a17c4b0..ea7d800eb 100644
--- a/scripts/Dpkg/Control/Fields.pm
+++ b/scripts/Dpkg/Control/Fields.pm
@@ -328,6 +328,8 @@ foreach my $op (run_vendor_hook("register-custom-fields")) {
     }
 }
 
+=encoding utf8
+
 =head1 NAME
 
 Dpkg::Control::Fields - manage (list of official) control fields
diff --git a/scripts/Dpkg/Control/Hash.pm b/scripts/Dpkg/Control/Hash.pm
index 2633b4f97..9ecf7d346 100644
--- a/scripts/Dpkg/Control/Hash.pm
+++ b/scripts/Dpkg/Control/Hash.pm
@@ -34,6 +34,8 @@ use overload
     '%{}' => sub { ${$_[0]}->{'fields'} },
     'eq' => sub { "$_[0]" eq "$_[1]" };
 
+=encoding utf8
+
 =head1 NAME
 
 Dpkg::Control::Hash - parse and manipulate a block of RFC822-like fields
@@ -46,7 +48,7 @@ capitalized the same when output (see field_capitalize function in
 Dpkg::Control::Fields).
 The order in which fields have been set is remembered and is used
 to be able to dump back the same content. The output order can also be
-overriden if needed.
+overridden if needed.
 
 You can store arbitrary values in the hash, they will always be properly
 escaped in the output to conform to the syntax of control files. This is
@@ -260,7 +262,7 @@ file.
 
 Get a string representation of the control information. The fields
 are sorted in the order in which they have been read or set except
-if the order has been overriden with set_output_order().
+if the order has been overridden with set_output_order().
 
 =item $c->output($fh)
 
diff --git a/scripts/Dpkg/Control/Info.pm b/scripts/Dpkg/Control/Info.pm
index b0d45af63..93660f43b 100644
--- a/scripts/Dpkg/Control/Info.pm
+++ b/scripts/Dpkg/Control/Info.pm
@@ -29,6 +29,8 @@ use base qw(Dpkg::Interface::Storable);
 use overload
     '@{}' => sub { return [ $_[0]->{source}, @{$_[0]->{packages}} ] };
 
+=encoding utf8
+
 =head1 NAME
 
 Dpkg::Control::Info - parse files like debian/control
diff --git a/scripts/Dpkg/Control/Types.pm b/scripts/Dpkg/Control/Types.pm
index 640ba65f1..56ddeca17 100644
--- a/scripts/Dpkg/Control/Types.pm
+++ b/scripts/Dpkg/Control/Types.pm
@@ -18,6 +18,8 @@ our @EXPORT = qw(CTRL_UNKNOWN CTRL_INFO_SRC CTRL_INFO_PKG CTRL_INDEX_SRC
                  CTRL_INDEX_PKG CTRL_PKG_SRC CTRL_PKG_DEB CTRL_FILE_CHANGES
                  CTRL_FILE_VENDOR CTRL_FILE_STATUS CTRL_CHANGELOG);
 
+=encoding utf8
+
 =head1 NAME
 
 Dpkg::Control::Types - export CTRL_* constants