see plug-ins/perl/Changes

plug-ins/perl/Changes

@@ -1,9 +1,9 @@
 Revision history for Gimp-Perl extension.
 
 1.11  Tue Aug  3 03:23:23 CEST 1999
-	NOTYET - EXPERIMENTALLY re-enabled the return path from main. It works
-        NOTYET   with perl 5.005_58, but I remember problems with other versions.
-        NOTYET  This re-enables END handlers etc.
+	- EXPERIMENTALLY re-enabled the return path from main. It works
+          with perl 5.005_60, but I remember problems with other versions.
+          This re-enables END handlers etc.
 	- updated seths scripts, added remove_guides...
         - examples/glowing_steel was missing from the MANIFEST!!
         - data types for RADIO, SPINNER etc.. are guessed better now.

plug-ins/perl/Gimp.pm

@@ -401,10 +401,7 @@ sub on_net  (&) { register_callback "net"  , $_[0] }
 
 sub main {
    $caller=caller;
-   #d# #D# # BIG BUG LURKING SOMEWHERE
-   # just calling exit() will be too much for bigexitbug.pl
-   #&{"$interface_pkg\::gimp_main"};
-   xs_exit(&{"$interface_pkg\::gimp_main"});
+   &{"$interface_pkg\::gimp_main"};
 }
 
 # same as main, but callbacks are ignored

plug-ins/perl/Gimp/Fu.pm

@@ -855,7 +855,7 @@ sub print_switches {
 }
 
 sub main {
-   $old_trace = Gimp::set_trace (0);#d#
+   $old_trace = Gimp::set_trace (0);
    if ($Gimp::help) {
       my $this=this_script;
       print <<EOF;
@@ -868,7 +868,7 @@ EOF
    } else {
       Gimp::main;
    }
-};
+}
 
 1;
 __END__

plug-ins/perl/Makefile.PL

@@ -12,7 +12,7 @@ $|=1;
       perlotine randomblends innerbevel fit-text guidegrid roundrectsel
       repdup centerguide stampify goldenmean triangle billboard mirrorsplit
       oneliners randomart1 pixelmap glowing_steel frame_reshuffle frame_filter
-      logulator miff magick guide_remove guides_to_selection burst map_to_gradient
+      logulator miff gimpmagick guide_remove guides_to_selection burst map_to_gradient
       fire povray
    );
 @shebang = (map("examples/$_",@examples),