Commit 4911777c authored by Kevin Cozens's avatar Kevin Cozens

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.
parent 0d65fd7b
......@@ -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))
)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment