Hey all! I'm trying to write my first script, but it is doing nothing.
nonroot@local:~/.gimp-2.7/scripts$ cat ./test.scm
(let* ((filelist (cadr (file-glob "*.jpg" 1))))
(while (not (null? filelist) )
(image (car (gimp-file-load 0 filename filename)))
(drawable (car (gimp-image-get-active-layer image))))
(gimp-color-balance drawable 1 TRUE -0.3 -0.03 0.224)
(gimp-file-save 1 image drawable filename filename)
(gimp-image-delete image) )
(set! filelist (cdr filelist)))))
nonroot@local:~/testdir$ gimp -i -b '(batch-blue)' -b '(gimp-quit 0)'
This is a development version of GIMP. Debug messages may appear here.
mapped '/Xtns/Misc' to '/File/Create/Misc'
batch command executed successfully
plug-in 'script-fu' aborted before sending its procedure return values
The images from forder are updating, but color-balance is not changing....
Show me please my errors, i'm newb in scripting, have no idea.