[gimp-perl] Make File/Create examples display new images. Bug 728569

[Ed J <edj src gnome org>]

commit 31475ee12a990c11cc4302ad0e575ee64cbf4b79
Author: Ed J <m8r-35s8eo mailinator com>
Date:   Sat Apr 19 20:00:20 2014 +0100

    Make File/Create examples display new images. Bug 728569

 examples/bricks        |    1 +
 examples/glowing_steel |    1 +
 examples/goldenmean    |    1 +
 examples/innerbevel    |    1 +
 examples/pixelmap      |    1 +
 examples/randomart1    |    1 +
 examples/stamps        |    1 +
 examples/yinyang       |    1 +
 8 files changed, 8 insertions(+), 0 deletions(-)
---
diff --git a/examples/bricks b/examples/bricks
index f70f747..8f6413b 100755
--- a/examples/bricks
+++ b/examples/bricks
@@ -128,6 +128,7 @@ sub do_bricks {
     gimp_drawable_offset ($layerpat,1,0,-1,-1);
     gimp_drawable_offset ($layerb,1,0,-1,-1);
     gimp_context_pop();
+    gimp_display_new($image);
 
     $image;
 }
diff --git a/examples/glowing_steel b/examples/glowing_steel
index 32ac000..c529a7f 100755
--- a/examples/glowing_steel
+++ b/examples/glowing_steel
@@ -82,6 +82,7 @@ sub perl_fu_glowing_steel {
   gimp_image_set_active_layer($image,$backlayer);
 
   gimp_context_pop();
+  gimp_display_new($image);
 
   return $image;
 }
diff --git a/examples/goldenmean b/examples/goldenmean
index db46657..124ce52 100755
--- a/examples/goldenmean
+++ b/examples/goldenmean
@@ -26,6 +26,7 @@ sub goldenmean {
        Gimp::Context->push();
        $layer->gimp_edit_fill(BACKGROUND_FILL);
        Gimp::Context->pop();
+       Gimp::Display->new($img);
 
        return $img;
 }
diff --git a/examples/innerbevel b/examples/innerbevel
index ad1d1ec..a27094e 100755
--- a/examples/innerbevel
+++ b/examples/innerbevel
@@ -93,6 +93,7 @@ $img->add_new_layer(2);
 $img->gimp_selection_none();
 
 Gimp::Context->pop();
+gimp_display_new($img);
 return($img);
 };
 
diff --git a/examples/pixelmap b/examples/pixelmap
index 2924336..0d7f2f2 100755
--- a/examples/pixelmap
+++ b/examples/pixelmap
@@ -92,6 +92,7 @@ register "pixelgen",
       $image->delete;
       die $error;
    };
+   Gimp::Display->new($image);
    $image;
 };
 
diff --git a/examples/randomart1 b/examples/randomart1
index 4d29a8d..3621ce9 100755
--- a/examples/randomart1
+++ b/examples/randomart1
@@ -102,6 +102,7 @@ register "random_art_1",                    # Funktionsname
 
    $image->selection_none;
    $image->undo_enable;
+   Gimp::Display->new($image);
 
    # Gib das neu erzeugte Bild zur�ck, damit es angezeigt wird.
    $image;
diff --git a/examples/stamps b/examples/stamps
index 08318b2..f4214dc 100755
--- a/examples/stamps
+++ b/examples/stamps
@@ -38,6 +38,7 @@ sub stamps {
 
 # here, at last, comes the clever part! :-)
        $layer->offset(1, 0, -($diameter / 2), -($diameter / 2));
+       gimp_display_new($img);
        return $img;
 }
 
diff --git a/examples/yinyang b/examples/yinyang
index 69cf9e9..293d2af 100755
--- a/examples/yinyang
+++ b/examples/yinyang
@@ -71,6 +71,7 @@ sub yinyang {
     # Finish up
     gimp_context_pop();
     gimp_selection_none($img);
+    gimp_display_new($img);
 
     $img;
 }