From ab1316ef3c6b75d16904e1829698757009985294 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Wed, 12 Sep 2007 10:18:34 +0000
Subject: better formatting

---
 perl-install/NEWS               |  1 +
 perl-install/standalone/drakbug | 24 ++++++++++++++++--------
 2 files changed, 17 insertions(+), 8 deletions(-)

diff --git a/perl-install/NEWS b/perl-install/NEWS
index f1c5d07fc..c10ee2004 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,5 +1,6 @@
 - drakbug:
   o use a TextView instead of Label so that text is selectable (see #33023)
+  o better formatting
 
 Version 10.4.192 - 12 September 2007, by Olivier "blino" Blin
 
diff --git a/perl-install/standalone/drakbug b/perl-install/standalone/drakbug
index 17009e627..df4c30a65 100755
--- a/perl-install/standalone/drakbug
+++ b/perl-install/standalone/drakbug
@@ -96,15 +96,23 @@ gtkadd($window->{window},
        gtkpack_(Gtk2::VBox->new(0, 5),
                 0, gtknew('Title1', label => $mandrake_release),
                 1, create_scrolled_window(
-                    gtknew('TextView',
-                           text => formatAlaTeX(
-                        join("\n\n",
-                             if_($prog, $error ?
-                                   N("The \"%s\" program has crashed with the following error:", $prog)
-                                     . join("\n\n", "\n", split("\n", $error), '')
-                                       : N("The \"%s\" program has crashed.", $prog)
+                    gtknew('TextView', editable => 0, height => 200,
+                           text => [
+                               if_($prog, $error ?
+                                     (
+                                         [
+                                             N("The \"%s\" program has crashed with the following error:", $prog),
+                                         ],
+                                         [
+                                             "\n\n  " . join("\n  ", split("\n", $error)) . "\n\n",
+                                             { family => 'monospace' }
+                                         ]
+                                     ) : [ N("The \"%s\" program has crashed.", $prog) . "\n\n" ]
                                  ),
-                             N("To submit a bug report, click on the report button.  \nThis will open a web browser window on %s where you'll find a form to fill in.  The information displayed above will be transferred to that server.  \nThings useful to include in your report are the output of lspcidrake -v, kernel version, and /proc/cpuinfo.", $wizard_name)))), "left"),
+                               [
+                                   N("To submit a bug report, click on the report button.  \nThis will open a web browser window on %s where you'll find a form to fill in.  The information displayed above will be transferred to that server.  \nThings useful to include in your report are the output of lspcidrake -v, kernel version, and /proc/cpuinfo.", $wizard_name)
+                               ]
+                           ])),
 		0, gtkadd($table),
 		0, gtkpack(Gtk2::HSeparator->new),
 		0, gtkpack(create_hbox('edge'),
-- 
cgit v1.2.1