diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-03-06 20:32:59 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-03-06 20:32:59 +0000 |
| commit | 3ce11d7979cda35efb4302c832d8611d2926c946 (patch) | |
| tree | 58cffc2f8272799c360ea82b272cbf562a997db7 /perl-install/install | |
| parent | 3b2be944da51e436cb4cb8cc69db6f4ceef7b591 (diff) | |
| download | drakx-backup-do-not-use-3ce11d7979cda35efb4302c832d8611d2926c946.tar drakx-backup-do-not-use-3ce11d7979cda35efb4302c832d8611d2926c946.tar.gz drakx-backup-do-not-use-3ce11d7979cda35efb4302c832d8611d2926c946.tar.bz2 drakx-backup-do-not-use-3ce11d7979cda35efb4302c832d8611d2926c946.tar.xz drakx-backup-do-not-use-3ce11d7979cda35efb4302c832d8611d2926c946.zip | |
(SEGV handler) no doble backtrace in logs
Diffstat (limited to 'perl-install/install')
| -rw-r--r-- | perl-install/install/install2.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install/install2.pm b/perl-install/install/install2.pm index 96720aa62..025382977 100644 --- a/perl-install/install/install2.pm +++ b/perl-install/install/install2.pm @@ -319,7 +319,7 @@ sub main { #- $SIG{__DIE__} = sub { warn "DIE " . backtrace() . "\n" }; $SIG{SEGV} = sub { my $msg = "segmentation fault: install crashed (maybe memory is missing?)\n" . backtrace(); - log::l("$msg\n" . backtrace()); + log::l("$msg\n"); $o and $o->ask_warn('', $msg); setVirtual(1); stop_udev() if !$::local_install; |