(rpm_summary) kill it; since perl-URPM-1.56, perl knows that strings from rpm

headers are UTF-8, thus fixing a crash (#33283)

1 files changed, 1 insertions, 7 deletions

diff --git a/Rpmdrake/formatting.pm b/Rpmdrake/formatting.pm
index 567855dc..0da48a43 100644
--- a/Rpmdrake/formatting.pm
+++ b/Rpmdrake/formatting.pm
@@ -33,15 +33,9 @@ use ugtk2 qw(escape_text_for_TextView_markup_format);
 
 use Exporter;
 our @ISA = qw(Exporter);
-our @EXPORT = qw(format_field format_header localtime2changelog my_fullname pkg2medium rpm_description rpm_summary split_fullname urpm_name);
+our @EXPORT = qw(format_field format_header localtime2changelog my_fullname pkg2medium rpm_description split_fullname urpm_name);
 
 
-sub rpm_summary {
-    my ($summary) = @_;
-    utf8::decode($summary) if !utf8::is_utf8($summary);
-    $summary;
-}
-
 sub rpm_description {
     my ($description) = @_;
     utf8::decode($description);