[gimp-perl] Since ->become checks validity, no need to do manually.

[Ed J <edj src gnome org>]

commit 8ffb74f9004cd2ff65cbdc4af6eb973acc8cb8cd
Author: Ed J <edj src gnome org>
Date:   Tue Jun 3 04:14:52 2014 +0100

    Since ->become checks validity, no need to do manually.

 examples/blowinout         |    1 -
 examples/example-no-fu     |    4 ----
 examples/fade-alpha        |    1 -
 examples/layerfuncs        |    1 -
 examples/selective_sharpen |    2 --
 examples/xachlego          |    3 +--
 examples/xachshadow        |    1 -
 7 files changed, 1 insertions(+), 12 deletions(-)
---
diff --git a/examples/blowinout b/examples/blowinout
index c82774f..0fee0ae 100755
--- a/examples/blowinout
+++ b/examples/blowinout
@@ -7,7 +7,6 @@ use strict;
 use warnings;
 
 podregister {
-  die "Not a layer\n" unless $drawable->is_layer;
   $drawable->become('Gimp::Layer');
   return if $image->selection_is_empty == 0;
   $image->undo_group_start;
diff --git a/examples/example-no-fu b/examples/example-no-fu
index 84a62d7..27563d2 100755
--- a/examples/example-no-fu
+++ b/examples/example-no-fu
@@ -786,10 +786,6 @@ sub avg { ($_[0] + $_[1]) / 2 }
 sub do_fade {
   my ($image, $drawable) = @_;
 
-  die <<EOF unless $drawable->is_layer;
-$plugin: Can only operate on layers. Check that you don't have a channel
-or floating selection currently selected.
-EOF
   $drawable->become('Gimp::Layer');
 
   $image->undo_group_start;
diff --git a/examples/fade-alpha b/examples/fade-alpha
index 36700a5..89a92e0 100755
--- a/examples/fade-alpha
+++ b/examples/fade-alpha
@@ -772,7 +772,6 @@ our @arr = (
 sub avg { ($_[0] + $_[1]) / 2 }
 
 podregister {
-  die "Can only operate on layers\n" unless $drawable->is_layer;
   $drawable->become('Gimp::Layer');
   $image->undo_group_start;
   my @bounds = $image->selection_bounds;
diff --git a/examples/layerfuncs b/examples/layerfuncs
index d7d990f..e76b4f9 100755
--- a/examples/layerfuncs
+++ b/examples/layerfuncs
@@ -6,7 +6,6 @@ use strict;
 use warnings;
 
 podregister {
-  die "Must have layer selected\n" unless $drawable->is_layer;
   $drawable->become('Gimp::Layer');
   $drawable->set_offsets(
     ($image->width - $drawable->width )/2,
diff --git a/examples/selective_sharpen b/examples/selective_sharpen
index f6f626e..f7d0be9 100755
--- a/examples/selective_sharpen
+++ b/examples/selective_sharpen
@@ -7,8 +7,6 @@ use strict;
 use warnings;
 
 podregister {
-  # sanity stuff
-  die "Can only operate on layers" unless $drawable->is_layer;
   $drawable->become('Gimp::Layer');
 
   $image->undo_group_start;
diff --git a/examples/xachlego b/examples/xachlego
index 8dbf5ac..2654f86 100755
--- a/examples/xachlego
+++ b/examples/xachlego
@@ -7,9 +7,8 @@ use warnings;
 
 podregister {
   my $selection_flag = 0;
-  $image->undo_group_start;
-  die "Not a layer\n" unless $drawable->is_layer;
   $drawable->become('Gimp::Layer');
+  $image->undo_group_start;
   $drawable->add_alpha unless $drawable->has_alpha;
   if ($image->selection_is_empty) {
     $image->selection_all;
diff --git a/examples/xachshadow b/examples/xachshadow
index a64eccd..e066dc9 100755
--- a/examples/xachshadow
+++ b/examples/xachshadow
@@ -6,7 +6,6 @@ use strict;
 use warnings;
 
 podregister {
-  die "Must have layer selected\n" unless $drawable->is_layer;
   $drawable->become('Gimp::Layer');
   $image->undo_group_start;
   Gimp::Context->push();