[Gimp-developer] [*correction*][writing to files] Error: set-output-port: needs 1 argument(s)

[Kevin Cozens]

Bill Skaggs wrote:
> The script can be made to work in Gimp by adding one line:
[snip]
>             (write-char #\space port)
> 
> as you do, and if "port" is not the current output port, then
> scheme saves the value of the current port, sets the output
> port to "port", performs the write, and then resets the output
> port back to the old value.  Your code never sets the output
> port, so this set-reset sequence happens for every write and
> write-char command.  Furthermore, the "old value" is undefined.
> 
> I don't know enough about scheme to say whether this is a bug
> in your code or in tinyscheme.

Thanks, Bill. Please add the comments to bug #523974. Since the script 
generates the correct output when run with TinyScheme I am considering this a 
bug in Script-Fu.

-- 
Cheers!

Kevin.

http://www.ve3syb.ca/           |"What are we going to do today, Borg?"
Owner of Elecraft K2 #2172      |"Same thing we always do, Pinkutus:
                                 |  Try to assimilate the world!"
#include <disclaimer/favourite> |              -Pinkutus & the Borg