From 8fd1b94fd490f1f5e17c9e069f28f74155df82be Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Tue, 21 Mar 2006 18:29:41 +0000 Subject: Adjust progress bar length to terminal size --- urpm.pm | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/urpm.pm b/urpm.pm index ab428e17..f9b9a3e1 100644 --- a/urpm.pm +++ b/urpm.pm @@ -2894,12 +2894,19 @@ sub extract_packages_to_install { \%inst; } +my $progress_size = 45; +eval { + require Term::ReadKey; + ($progress_size) = Term::ReadKey::GetTerminalSize(); + $progress_size -= 35; + $progress_size < 5 and $progress_size = 5; +}; + #- install logger (a la rpm) sub install_logger { my ($urpm, $type, $id, $subtype, $amount, $total) = @_; my $pkg = defined $id && $urpm->{depslist}[$id]; my $total_pkg = $urpm->{nb_install}; - my $progress_size = 45; if ($subtype eq 'start') { $urpm->{logger_progress} = 0; -- cgit v1.2.1