diff options
| -rw-r--r-- | Rpmdrake/formatting.pm | 3 | ||||
| -rw-r--r-- | Rpmdrake/pkg.pm | 3 |
2 files changed, 3 insertions, 3 deletions
diff --git a/Rpmdrake/formatting.pm b/Rpmdrake/formatting.pm index 43b72312..07ad40fc 100644 --- a/Rpmdrake/formatting.pm +++ b/Rpmdrake/formatting.pm @@ -40,6 +40,7 @@ our @EXPORT = qw( format_changelog_string format_field format_header + formatlistpkg format_name_n_summary format_size format_update_field @@ -164,4 +165,6 @@ sub format_size { N("%s of disk space will be freed.", formatXiB(-$size)); } +sub formatlistpkg { join("\n", map { s/^(\s)/ $1/mg; "- $_" } sort { uc($a) cmp uc($b) } @_) } + 1; diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index 2fd79c4a..b95e7a68 100644 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -52,7 +52,6 @@ our @EXPORT = qw( download_callback extract_header find_installed_version - formatlistpkg get_pkgs parse_compssUsers_flat perform_installation @@ -193,8 +192,6 @@ sub find_installed_version { @version ? join(',', sort @version) : N("(none)"); } -sub formatlistpkg { join("\n", map { s/^(\s)/ $1/mg; "- $_" } sort { uc($a) cmp uc($b) } @_) } - my $canceled; sub download_callback { my ($gurpm, $mode, $file, $percent, $total, $eta, $speed) = @_; |