Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --- resynthesizer-0.14/smart-remove.scm 2006-03-01 00:09:21.000000000 +0100
- +++ resynthesizer-0.15/smart-remove.scm 2006-12-18 01:31:19.000000000 +0100
- @@ -1,5 +1,5 @@
- -; Smart Remove version 0.2
- +; Smart Remove
- ; Smart selection eraser.
- ; Requires resynthesizer plug-in.
- @@ -10,7 +10,7 @@
- ((= 0 (car (gimp-selection-bounds img)))
- (gimp-message "To use this script-fu, first select the region you wish to remove.")
- )
- - (t (let*
- + (#t (let*
- (
- (width (car (gimp-drawable-width layer)))
- (height (car (gimp-drawable-height layer)))
- @@ -24,14 +24,14 @@
- (gimp-selection-invert dupe)
- (let*
- (
- - (old-background (car (gimp-palette-get-background)))
- + (old-background (car (gimp-context-get-background)))
- (channel2 (car (gimp-selection-save dupe)))
- )
- (gimp-selection-load channel)
- - (gimp-palette-set-background '(255 255 255))
- + (gimp-context-set-background '(255 255 255))
- (gimp-edit-clear channel2)
- - (gimp-palette-set-background old-background)
- + (gimp-context-set-background old-background)
- (gimp-selection-load channel2)
- )
Add Comment
Please, Sign In to add comment