callisto-debian/gimp
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Moved the MIN and MAX entries for image size and resolution to

Browse Source 
2006-10-20  Kevin Cozens  <kcozens@cvs.gnome.org>

	* plug-ins/script-fu/scheme-wrapper.c: Moved the MIN and MAX entries
	for image size and resolution to script_constants structureas they
	are not deprecated constants.

	* plug-ins/script-fu/scripts/script-fu.init: Removed CR in line endings.

	* plug-ins/script-fu/scripts/*.scm: Fixed a number of regressions that
	snuck in during the last big update of the scripts. This update
	reduces the number of differences to the original scripts (other than
	formatting). Some additional formatting changes in a few scripts.
	Updates to use colour names in register block where possible. Fixed a
	bug in burn-in-anim.scm. Minor cleanup of font-map.scm. Simplified
	the bug fix in tile-blur.scm.
This commit is contained in:
Kevin Cozens
2006-10-20 17:55:14 +00:00
committed by Kevin Cozens
parent 3cda6f2610
commit 590c4d0b9f
84 changed files with 1281 additions and 1221 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
plug-ins/script-fu/scripts/distress-selection.scm
View File

@ -49,15 +49,13 @@
(gimp-image-add-layer theImage theLayer 0)
(if (= TRUE (car (gimp-selection-is-empty theImage)))
()
(if (= FALSE (car (gimp-selection-is-empty theImage)))
(gimp-edit-fill theLayer BACKGROUND-FILL)
)
(gimp-selection-invert theImage)
(if (= TRUE (car (gimp-selection-is-empty theImage)))
()
(if (= FALSE (car (gimp-selection-is-empty theImage)))
(gimp-edit-clear theLayer)
)
@ -89,8 +87,6 @@
)
; Register the function with the GIMP:
(script-fu-register "script-fu-distress-selection"
_"_Distort..."
_"Distress the selection"
@ -100,7 +96,7 @@
"RGB*"
SF-IMAGE "The image" 0
SF-DRAWABLE "The layer" 0
SF-ADJUSTMENT _"Threshold" '(127 1 255 1 10 0 0)
SF-ADJUSTMENT _"Threshold (bigger 1<-->255 smaller)" '(127 1 255 1 10 0 0)
SF-ADJUSTMENT _"Spread" '(8 0 1000 1 10 0 1)
SF-ADJUSTMENT _"Granularity (1 is low)" '(4 1 25 1 10 0 1)
SF-ADJUSTMENT _"Smooth" '(2 1 150 1 10 0 1)