From 5c5fd3fcb1c2ca689f62f7b29f376bc56feb6d64 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Fri, 20 Dec 2013 11:42:07 +0100
Subject: fix a crash (mga#12057)

---
 perl-install/standalone/drakfont | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/standalone/drakfont')

diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index c67041263..68e4c67eb 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -633,7 +633,7 @@ sub advanced_install() {
     $list->get_selection->set_mode('browse');
     $list->set_rules_hint(1);
     $model->signal_connect("row-inserted" => sub { $button and $button->set_sensitive(1) });
-    $model->signal_connect("row-deleted" => sub { $button and $button->set_sensitive($model->get_iter_first) });
+    $model->signal_connect("row-deleted" => sub { $button and $button->set_sensitive($model->get_iter_first || 0) });
 
     dialog(N("Import fonts"),
            [
-- 
cgit v1.2.1