diff options
author | Antoine Ginies <aginies@mandriva.com> | 2011-01-19 10:44:49 +0000 |
---|---|---|
committer | Antoine Ginies <aginies@mandriva.com> | 2011-01-19 10:44:49 +0000 |
commit | 530a16ec071db0e24e6e949e265a96848864967c (patch) | |
tree | fe40cacd28d67b98186754c551b7fd339ebc7e17 /perl-install/standalone/drakbug_report | |
download | drakx-backup-do-not-use-530a16ec071db0e24e6e949e265a96848864967c.tar drakx-backup-do-not-use-530a16ec071db0e24e6e949e265a96848864967c.tar.gz drakx-backup-do-not-use-530a16ec071db0e24e6e949e265a96848864967c.tar.bz2 drakx-backup-do-not-use-530a16ec071db0e24e6e949e265a96848864967c.tar.xz drakx-backup-do-not-use-530a16ec071db0e24e6e949e265a96848864967c.zip |
add mes5-2.6.33 branch
Diffstat (limited to 'perl-install/standalone/drakbug_report')
-rwxr-xr-x | perl-install/standalone/drakbug_report | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/perl-install/standalone/drakbug_report b/perl-install/standalone/drakbug_report new file mode 100755 index 000000000..d40d5a1c4 --- /dev/null +++ b/perl-install/standalone/drakbug_report @@ -0,0 +1,15 @@ +#!/usr/bin/perl + +use lib qw(/usr/lib/libDrakX); + +use standalone; +use common; +use any; + +my %other = ( + 'rpm -qa' => join('', sort `rpm -qa`), + 'mandrake version' => mandrake_release(), + 'df' => join('', `df`), +); + +print any::report_bug(%other); |