diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/any.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index c7214ac34..e3bc3b3ae 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -1220,14 +1220,14 @@ sub set_login_serial_console { substInFile { s/^s$port:.*//; $_ = $line if eof } "$::prefix/etc/inittab"; } -sub report_bug { - my (@other) = @_; - - sub header { " +sub header { " ******************************************************************************** * $_[0] ********************************************************************************"; - } +} + +sub report_bug { + my (@other) = @_; join '', map { chomp; "$_\n" } header("lspci"), detect_devices::stringlist(), |