summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--gurpmi5
1 files changed, 3 insertions, 2 deletions
diff --git a/gurpmi b/gurpmi
index 72003a1f..3734bba4 100644
--- a/gurpmi
+++ b/gurpmi
@@ -35,7 +35,8 @@ $mainbox = Gtk2::VBox->new(0, 5);
$mainw->add($mainbox);
sub all_descriptions {
- join '', qx(rpm -qp --qf '%{name}-%{version}-%{release}: %{summary}\\n' @_);
+ my (@rpms) = @_;
+ join '', `rpm -qp --qf '%{name}-%{version}-%{release}: %{summary}\\n' @rpms`;
}
foreach (@all_rpms) {
@@ -50,7 +51,7 @@ foreach (@all_rpms) {
/\.src\.rpm$/ ? push(@$srpms, $_) : push(@$rpms, $_);
}
-sub proceed {
+sub proceed() {
#- we need to switch to root if we're not already (via consolehelper)
#- yes. hardcoded paths. safe.
exec $> ? '/usr/bin/gurpmi2' : '/usr/sbin/gurpmi2', @ARGV;