do not die if loaded file isn't an image (#16829)

1 files changed, 5 insertions, 1 deletions

diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash
index 13dd89b22..71228c7a7 100755
--- a/perl-install/standalone/draksplash
+++ b/perl-install/standalone/draksplash
@@ -154,7 +154,11 @@ sub load_image {
 	$mode = 0;
 	@image_pixbuf = ();
     }
-    $image_pixbuf[$mode] = Gtk2::Gdk::Pixbuf->new_from_file($img);
+    eval { $image_pixbuf[$mode] = Gtk2::Gdk::Pixbuf->new_from_file($img) };
+    if ($@) {
+        $in->ask_warn(N("Error"), N("Unable to load image file %s", $img));
+        return;
+    }
     $image_pixbuf[$mode] = $image_pixbuf[$mode]->scale_simple($theme{res_w}, $theme{res_h}, 'hyper');
     $image_pixbuf[1-$mode] or $image_pixbuf[1-$mode] = $image_pixbuf[$mode];
     $image_area->queue_draw;