diff options
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/drakbug_report | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/standalone/drakbug_report b/perl-install/standalone/drakbug_report index 02eabebdf..170b519d9 100755 --- a/perl-install/standalone/drakbug_report +++ b/perl-install/standalone/drakbug_report @@ -4,4 +4,8 @@ use lib qw(/usr/lib/libDrakX); use any; -print any::report_bug(); +my %other = ( + 'rpm -qa' => join('', sort `rpm -qa`), +); + +print any::report_bug('', %other); |