diff options
author | Thierry Vignaud <tv@mandriva.org> | 2007-09-17 15:52:57 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2007-09-17 15:52:57 +0000 |
commit | a3a01f4ee06aa9df8dcdaaf30cf9e27f3049e55d (patch) | |
tree | a8c3e7282f8601efe5b6059a14cbc62593e46804 /Rpmdrake/pkg.pm | |
parent | f4aabe2d824f5e8c3c0576acbbb91a2676dfe760 (diff) | |
download | rpmdrake-a3a01f4ee06aa9df8dcdaaf30cf9e27f3049e55d.tar rpmdrake-a3a01f4ee06aa9df8dcdaaf30cf9e27f3049e55d.tar.gz rpmdrake-a3a01f4ee06aa9df8dcdaaf30cf9e27f3049e55d.tar.bz2 rpmdrake-a3a01f4ee06aa9df8dcdaaf30cf9e27f3049e55d.tar.xz rpmdrake-a3a01f4ee06aa9df8dcdaaf30cf9e27f3049e55d.zip |
(extract_header,format_pkg_simplifiedinfo) indent expanders' contents
Diffstat (limited to 'Rpmdrake/pkg.pm')
-rw-r--r-- | Rpmdrake/pkg.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index 2e3819da..83e77900 100644 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -48,7 +48,7 @@ use urpm::args qw(); use Exporter; our @ISA = qw(Exporter); -our @EXPORT = qw(extract_header find_installed_version formatlistpkg get_pkgs parse_compssUsers_flat perform_installation perform_removal run_rpm); +our @EXPORT = qw(extract_header find_installed_version formatlistpkg get_pkgs parse_compssUsers_flat perform_installation perform_removal run_rpm $spacing); use mygtk2 qw(gtknew); use ugtk2 qw(:all); @@ -90,11 +90,12 @@ sub run_rpm { } +our $spacing = " "; sub extract_header { my ($pkg, $urpm) = @_; my $chg_prepro = sub { #- preprocess changelog for faster TextView insert reaction - [ map { [ "$_\n", if_(/^\*/, { 'weight' => Gtk2::Pango->PANGO_WEIGHT_BOLD }) ] } split("\n", $_[0]) ]; + [ map { [ "$spacing$_\n", if_(/^\*/, { 'weight' => Gtk2::Pango->PANGO_WEIGHT_BOLD }) ] } split("\n", $_[0]) ]; }; my $name = urpm_name($pkg->{pkg}); if ($pkg->{pkg}->flag_installed && !$pkg->{pkg}->flag_upgrade) { |