diff --git a/plug-ins/perl/Changes b/plug-ins/perl/Changes index dce5eb8ab5..1fbabeaa29 100644 --- a/plug-ins/perl/Changes +++ b/plug-ins/perl/Changes @@ -16,6 +16,8 @@ Revision history for Gimp-Perl extension. - applied libintl fix by yasuhiro@awa.tohoku.ac.jp. - applied save_image/PNG-noextra switch patch by pkaempf@box.echo.ch. - applied Perl-Server reuseaddress fix by gphan@webjuice.com. + - corrected the libintl fix to really work. + - added fr and ru translations. 1.19 Thu Jan 6 00:21:58 CET 2000 - used N_ to mark all the menu paths, since gimp now tries to diff --git a/plug-ins/perl/MANIFEST b/plug-ins/perl/MANIFEST index e23c94c389..1ad9f5150a 100644 --- a/plug-ins/perl/MANIFEST +++ b/plug-ins/perl/MANIFEST @@ -134,5 +134,7 @@ po/de.po po/it.po po/cs.po po/no.po +po/fr.po +po/ru.po po/update.sh diff --git a/plug-ins/perl/Makefile.PL b/plug-ins/perl/Makefile.PL index d2f988b387..07aafdf51d 100644 --- a/plug-ins/perl/Makefile.PL +++ b/plug-ins/perl/Makefile.PL @@ -325,7 +325,7 @@ WriteMakefile( 'Gimp/Module.pm' => '$(INST_LIBDIR)/Gimp/Module.pm', 'Gimp/Config.pm' => '$(INST_LIBDIR)/Gimp/Config.pm', }, - 'LDFROM' => expand("\$(OBJECT) $LIBS"), # $INTLLIBS + 'LDFROM' => expand("\$(OBJECT) $LIBS $INTLLIBS"), 'INC' => "$INC1 $GIMP_INC_NOUI $CPPFLAGS $CFLAGS", 'DEFINE' => "$DEFINE1 $DEFS", 'EXE_FILES' => [qw(scm2perl scm2scm gimpdoc xcftopnm embedxpm)], diff --git a/plug-ins/perl/TODO b/plug-ins/perl/TODO index f73cb52e03..793b4676c0 100644 --- a/plug-ins/perl/TODO +++ b/plug-ins/perl/TODO @@ -23,6 +23,7 @@ firetext! AND _grayscale_ for map_gradient(!) sota-chrome pagesize of 2 is _wrong_ bugs + * damnit libintl crazy shit [DONE] * alow gimp_selection_shrink with a zero argument. * font_text with negative size? bug report #5523 * gimp-perl list archives.. where and add this to the gimp.html page! diff --git a/plug-ins/perl/config.pl.in b/plug-ins/perl/config.pl.in index e180cca1c4..32d4375c9c 100644 --- a/plug-ins/perl/config.pl.in +++ b/plug-ins/perl/config.pl.in @@ -1,8 +1,10 @@ # this is ugly, but it makes Gimp installable from within CPAN -$topdir="."; +use Cwd 'abs_path'; -$topdir.="/.." while ! -f "$topdir/MANIFEST"; +$topdir = "."; +$topdir .= "/.." while ! -f "$topdir/MANIFEST"; +$topdir = abs_path $topdir; $^W=0; @@ -67,6 +69,7 @@ while (($k,$v)=each(%cfg)) { } $GIMPTOOL = expand($GIMPTOOL); +$INTLLIBS = expand($INTLLIBS); if ($IN_GIMP) { $GIMP = $bindir."/gimp" if $IN_GIMP; diff --git a/plug-ins/perl/po/update.sh b/plug-ins/perl/po/update.sh index 4fa9e7d33a..76fcea21f5 100755 --- a/plug-ins/perl/po/update.sh +++ b/plug-ins/perl/po/update.sh @@ -7,7 +7,7 @@ test -f MANIFEST || exec echo "must be started in plug-ins/perl/po" msgmerge -w 83 po/gimp-perl.pot - >gimp-perl.pot~ && mv gimp-perl.pot~ po/gimp-perl.pot -for po in po/*.po; do - msgmerge -w 83 $po po/gimp-perl.pot >$po~ && mv $po~ $po -done +#for po in po/*.po; do +# msgmerge -w 83 $po po/gimp-perl.pot >$po~ && mv $po~ $po +#done