diff options
Diffstat (limited to 'scripts/Dpkg/Control/Fields.pm')
-rw-r--r-- | scripts/Dpkg/Control/Fields.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/scripts/Dpkg/Control/Fields.pm b/scripts/Dpkg/Control/Fields.pm index c4c1a0f10..673784914 100644 --- a/scripts/Dpkg/Control/Fields.pm +++ b/scripts/Dpkg/Control/Fields.pm @@ -412,8 +412,9 @@ added to $to otherwise. =cut -sub field_transfer_single($$_) { +sub field_transfer_single($$;$) { my ($from, $to, $field) = @_; + $field = $_ unless defined $field; my ($from_type, $to_type) = ($from->get_type(), $to->get_type()); $field = field_capitalize($field); |