Commit a36ef3fc authored by Sven Neumann's avatar Sven Neumann

Might be useful ...


--Sven
parent ec78557f
#!/usr/bin/perl
#
# Convert a script from the 1.0 Script-Fu interface to the new API
#
# ( This script is simple hack but may be useful for someone, so )
# ( I include it here. It is not meant to be distributed with a )
# ( gimp release. Sven Neumann <sven@gimp.org> )
#
#
# Changes so far are:
# - Use SF-STRING instead of SF-VALUE where appropriate
#
while (<>) {
if (/SF-VALUE/) {
if (s/\"\\\"(.*)\\\"\"/\"$1\"/) {
s/SF-VALUE/SF-STRING/;
}
}
print;
}
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment