[gimp-perl] Gimp::Net Gimp::UI for FONT graceful handling undef default.

[Ed J <edj src gnome org>]

commit 65973074896369a1d183fab14ad3298972858794
Author: Ed J <edj src gnome org>
Date:   Wed Jun 18 21:21:42 2014 +0100

    Gimp::Net Gimp::UI for FONT graceful handling undef default.

 UI/UI.pm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/UI/UI.pm b/UI/UI.pm
index 5a8f3f4..96782dc 100644
--- a/UI/UI.pm
+++ b/UI/UI.pm
@@ -450,7 +450,7 @@ my %PF2INFO = (
       my $val;
       my $l = new Gtk2::Label "!error!";
       my $setval = sub {
-       $val = shift;
+       $val = shift // '';
        $val =~ s#\s*(Bold)?\s*(Italic)?\s*\d+$##; # vim highlighter
        unless (defined $val && $fs->set_font_name ("$val 10")) {
          warn sprintf __"Illegal default font description: %s\n", $val