[gimp/metadata-browser] slide.scm: Don't use deprecated procedures (Fixes bug #647834)



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]