[gimp/metadata-browser] slide.scm: Don't use deprecated procedures (Fixes bug #647834)
- From: Roman Joost <romanofski src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [gimp/metadata-browser] slide.scm: Don't use deprecated procedures (Fixes bug #647834)
- Date: Wed, 12 Sep 2012 22:13:45 +0000 (UTC)
commit 01cecfb04034f16ca0f680f15abadc29b93479ef
Author: Kevin Cozens <kcozens svn gnome org>
Date: Wed Nov 9 19:14:10 2011 -0500
slide.scm: Don't use deprecated procedures (Fixes bug #647834)
Spotted by, and patch from, Alexis Wilhelm with white space changes and
a missing context-set added.
plug-ins/script-fu/scripts/slide.scm | 29 +++++++++++++----------------
1 files changed, 13 insertions(+), 16 deletions(-)
---
diff --git a/plug-ins/script-fu/scripts/slide.scm b/plug-ins/script-fu/scripts/slide.scm
index 20154a1..18c4036 100644
--- a/plug-ins/script-fu/scripts/slide.scm
+++ b/plug-ins/script-fu/scripts/slide.scm
@@ -96,6 +96,7 @@
)
(gimp-context-push)
+ (gimp-context-set-feather FALSE)
(gimp-image-undo-disable image)
@@ -185,22 +186,18 @@
(gimp-selection-none image)
(while (< hole 8)
- (gimp-rect-select image
- (* hole-space hole)
- top-y
- hole-width
- hole-height
- CHANNEL-OP-ADD
- FALSE
- 0)
- (gimp-rect-select image
- (* hole-space hole)
- bottom-y
- hole-width
- hole-height
- CHANNEL-OP-ADD
- FALSE
- 0)
+ (gimp-image-select-rectangle image
+ CHANNEL-OP-ADD
+ (* hole-space hole)
+ top-y
+ hole-width
+ hole-height)
+ (gimp-image-select-rectangle image
+ CHANNEL-OP-ADD
+ (* hole-space hole)
+ bottom-y
+ hole-width
+ hole-height)
(set! hole (+ hole 1))
)
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]