[gimp-perl] xach-lego2
- From: Ed J <edj src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [gimp-perl] xach-lego2
- Date: Wed, 28 May 2014 21:54:49 +0000 (UTC)
commit 4726191ba5ce762f4453c05e23cee079daab872f
Author: Michele <michele gherlone liceoberchet it>
Date: Wed May 28 23:50:38 2014 +0200
xach-lego2
Signed-off-by: Ed J <edj src gnome org>
examples/xachlego | 2 ++
1 files changed, 2 insertions(+), 0 deletions(-)
---
diff --git a/examples/xachlego b/examples/xachlego
index bc30035..bd5baf1 100755
--- a/examples/xachlego
+++ b/examples/xachlego
@@ -8,6 +8,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');
$drawable->add_alpha unless $drawable->has_alpha;
if ($image->selection_is_empty) {
$image->selection_all;
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]