Try to generate a script-fu-alien-glow-logo and save it to /root/a.png i get the error

ERROR: bad function (see errobj)

if i replace:   (image  (car (   (script-fu-alien-glow-logo "hello hello"  150 
"-*-utopia-bold-r-*-*-150-*-*-*-*-*-*-*"  '(255 0 0))    ))   )
with :          (image     (car (gimp-file-load 0 "/root/clock.gif" 
"/root/clock.gif"))), the saved image is ok.


Valter

-----------

(begin
      (let* 
         (
         (image  (car (   (script-fu-alien-glow-logo "hello hello"  150 
"-*-utopia-bold-r-*-*-150-*-*-*-*-*-*-*"  '(255 0 0))    ))   )
        ; (image     (car (gimp-file-load 0 "/root/clock.gif" "/root/clock.gif")))
         (drawable  nil)
         )
   
      (set! drawable      (car (gimp-image-flatten image)))
      (gimp-file-save 1 image drawable "/root/a.png" "/root/a.png")
      (gimp-image-delete image)
      ) ;let              
)


_______________________________________________
Gimp-developer mailing list
[EMAIL PROTECTED]
http://lists.xcf.berkeley.edu/mailman/listinfo/gimp-developer

Reply via email to