Re: [Gimp-user] Gradient and Palette conversions

2003-09-23 Thread Jeff Trefftzs
On Tue, 2003-09-23 at 04:01, Sven Neumann wrote:
> Hi,

> 
> What warnings do you get exactly? Perhaps we could suppress them or
> make them more subtle warnings that appear on the console only.
> 

I'm sorry -- I didn't make myself clear (too late at night, I guess.)
The warnings were on the console, not in gimp-message boxes, and were to
the effect that the palette was not in current gimp format, falling back
to legacy mode ...   

It wa irritating because I have a large number of palettes and the
plethora of messages made it difficult to find other, possibly more
important, error messages amid the clutter.  I have successfully
converted both the gradients and the palettes and now the messages have
stopped.

-- 

--Jeff

Jeff Trefftzs <[EMAIL PROTECTED]>
http://www.tcsn.net/trefftzsHome Page
http://gug.sunsite.dk/gallery.php?artist=68 Gimp Gallery
http://trefftzs.topcities.com/  Photo Gallery 

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


Re: [Gimp-user] Gradient and Palette conversions

2003-09-23 Thread Sven Neumann
Hi,

Jeff Trefftzs <[EMAIL PROTECTED]> writes:

> On Mon, 2003-09-22 at 17:14, Sven Neumann wrote:
> > Hi,
> > Oh? Actually 1.3 is supposed to read the 1.2 palette and gradient
> > files directly. Did we break backward compatibility? If so, this should
> > better be fixed.
> > 
> Gimp-1.3.20 seems to read the 1.2 palettes and gradients properly, but
> it complains mightily about having to use the legacy format.  These are
> purely for convenience and to reduce the number of warnings at load
> time.

What warnings do you get exactly? Perhaps we could suppress them or
make them more subtle warnings that appear on the console only.


Sven
___
Gimp-user mailing list
[EMAIL PROTECTED]
http://lists.xcf.berkeley.edu/mailman/listinfo/gimp-user


Re: [Gimp-user] Gradient and Palette conversions

2003-09-22 Thread Jeff Trefftzs
On Mon, 2003-09-22 at 17:14, Sven Neumann wrote:
> Hi,
> Oh? Actually 1.3 is supposed to read the 1.2 palette and gradient
> files directly. Did we break backward compatibility? If so, this should
> better be fixed.
> 
Gimp-1.3.20 seems to read the 1.2 palettes and gradients properly, but
it complains mightily about having to use the legacy format.  These are
purely for convenience and to reduce the number of warnings at load
time.

-- 

--Jeff

Jeff Trefftzs <[EMAIL PROTECTED]>
http://www.tcsn.net/trefftzsHome Page
http://gug.sunsite.dk/gallery.php?artist=68 Gimp Gallery
http://trefftzs.topcities.com/  Photo Gallery 

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


Re: [Gimp-user] Gradient and Palette conversions

2003-09-22 Thread Sven Neumann
Hi,

Jeff Trefftzs <[EMAIL PROTECTED]> writes:

> I have just written a couple of little perl scripts to convert existing
> gimp-1.2.x palettes and gradients into a form that gimp-1.3.20 finds
> acceptable.  In the hope that others might find them useful, I have
> attached them.

Oh? Actually 1.3 is supposed to read the 1.2 palette and gradient
files directly. Did we break backward compatibility? If so, this should
better be fixed.


Sven
___
Gimp-user mailing list
[EMAIL PROTECTED]
http://lists.xcf.berkeley.edu/mailman/listinfo/gimp-user


[Gimp-user] Gradient and Palette conversions

2003-09-22 Thread Jeff Trefftzs
Hi All,

I have just written a couple of little perl scripts to convert existing
gimp-1.2.x palettes and gradients into a form that gimp-1.3.20 finds
acceptable.  In the hope that others might find them useful, I have
attached them.

Happy Gimping!
-- 

--Jeff

Jeff Trefftzs <[EMAIL PROTECTED]>
http://www.tcsn.net/trefftzsHome Page
http://gug.sunsite.dk/gallery.php?artist=68 Gimp Gallery
http://trefftzs.topcities.com/  Photo Gallery 
#!/bin/env perl

#  grad2-1.3.pl:  convert gimp gradients from old (1.2 format) to
#  gimp-1.3 format by adding a Name:  gradient name line and a .ggr
#  extension to the output file.

#  usage:  grad2-1.3.pl  

use strict;
use File::Basename;

#  Make sure the last arg is a target directory
my $outdir = $ARGV[$#ARGV];
die "grad2-1.3.pl:  last parameter should be a directory.\n" unless (-d $outdir);
if (substr($outdir, length($outdir), 1) ne '/') {
  $outdir .= '/';
}
$#ARGV--;

#  Get the first gradient name
my ($fname, $path, $ext) = fileparse($ARGV[0]);
print STDERR "$fname\n";
my $outfname = $outdir . $fname . '.ggr'; # .ggr extension
print STDERR "Outfname is $outfname\n";
open(GRAD, ">$outfname") or die "Can't open output file\n";

while(<>) {
  if ($. == 2) {
my $gradname = $fname;
$gradname =~ s/_/ /g;	# convert underscores to spaces
print GRAD "Name: $gradname\n";
  }
  print GRAD;
  next unless (eof);
  close ARGV;			# reset line numbers
  last unless ($ARGV[0]);
  close GRAD;
  ($fname, $path, $ext) = fileparse($ARGV[0]);
  $outfname = $outdir . $fname . '.ggr';
  print STDERR "$fname\n";
  print STDERR "Outfilename is $outfname\n";
  open(GRAD, ">$outfname") or die "Can't open output file\n";
}
close GRAD;


#!/bin/env perl

#  palette2-1.3.pl:  convert gimp paletteients from old (1.2 format) to
#  gimp-1.3 format by adding a Name:  palette name line and a .gbr
#  extension to the output file.

#  usage:  palette2-1.3.pl  

use strict;
use File::Basename;

#  Make sure the last arg is a target directory
my $outdir = $ARGV[$#ARGV];
die "palette2-1.3.pl:  last parameter should be a directory.\n" unless (-d $outdir);
if (substr($outdir, length($outdir), 1) ne '/') {
  $outdir .= '/';
}
$#ARGV--;

#  Get the first palette name
my ($fname, $path, $ext) = fileparse($ARGV[0]);
print STDERR "$fname\n";
my $outfname = $outdir . $fname . '.gpl'; # .gpl extension
print STDERR "Outfname is $outfname\n";
open(PALETTE, ">$outfname") or die "Can't open output file\n";

while(<>) {
  if ($. == 2) {
my $palettename = $fname;
$palettename =~ s/_/ /g;	# convert underscores to spaces
print PALETTE "Name: $palettename\n";
  }
  print PALETTE;
  next unless (eof);
  close ARGV;			# reset line numbers
  last unless ($ARGV[0]);
  close PALETTE;
  ($fname, $path, $ext) = fileparse($ARGV[0]);
  $outfname = $outdir . $fname . '.gpl';
  print STDERR "$fname\n";
  print STDERR "Outfilename is $outfname\n";
  open(PALETTE, ">$outfname") or die "Can't open output file\n";
}
close PALETTE;


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