diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2007-08-02 06:18:46 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2007-08-02 06:18:46 +0000 |
| commit | ccb79dd69f08ec92076644f6cca9ca4a2f7ecb65 (patch) | |
| tree | a338350497edd2dc4654eed26337c873c435ab93 | |
| parent | 85130b92ccd6a286f5c23bcd4fc90ea29b3b3649 (diff) | |
| download | drakx-backup-do-not-use-ccb79dd69f08ec92076644f6cca9ca4a2f7ecb65.tar drakx-backup-do-not-use-ccb79dd69f08ec92076644f6cca9ca4a2f7ecb65.tar.gz drakx-backup-do-not-use-ccb79dd69f08ec92076644f6cca9ca4a2f7ecb65.tar.bz2 drakx-backup-do-not-use-ccb79dd69f08ec92076644f6cca9ca4a2f7ecb65.tar.xz drakx-backup-do-not-use-ccb79dd69f08ec92076644f6cca9ca4a2f7ecb65.zip | |
display the program that actually crashed and the error message
| -rw-r--r-- | perl-install/NEWS | 1 | ||||
| -rwxr-xr-x | perl-install/standalone/drakbug | 10 |
2 files changed, 10 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 7267f88e8..b6803ece0 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,4 +1,5 @@ - drakbug: + o display the program that actually crashed and the error message o do not fire on exceptions in eval { } o do not loop if drakbug crashes o put full backtrace on bugzilla, not only last call point diff --git a/perl-install/standalone/drakbug b/perl-install/standalone/drakbug index b8ba268f2..35e8edb36 100755 --- a/perl-install/standalone/drakbug +++ b/perl-install/standalone/drakbug @@ -95,7 +95,15 @@ $comb_app->set_text(""); gtkadd($window->{window}, gtkpack_(Gtk2::VBox->new(0, 5), 0, gtknew('Title1', label => $mandrake_release), - 0, gtkset_justify(Gtk2::WrappedLabel->new(formatAlaTeX(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 lspci, kernel version, and /proc/cpuinfo.", $wizard_name))), "left"), + 0, gtkset_justify(Gtk2::WrappedLabel->new( + 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) + ), + 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 lspci, kernel version, and /proc/cpuinfo.", $wizard_name)))), "left"), 0, gtkadd($table), 0, gtkpack(Gtk2::HSeparator->new), 0, gtkpack(create_hbox('edge'), |