see plug-ins/perl/Changes

1999-12-13 02:39:22 +00:00
parent ea5b4a1f62
commit cb5c8dfccd
6 changed files with 30 additions and 13 deletions
--- a/plug-ins/perl/UI/UI.pm
+++ b/plug-ins/perl/UI/UI.pm
@ -6,9 +6,15 @@ use Gtk;
 use base 'DynaLoader';

 BEGIN {
-   require DynaLoader;
   $VERSION = 1.18;
-   bootstrap Gimp::UI $VERSION;
+   eval {
+      require XSLoader;
+      XSLoader::load Gimp::UI $VERSION;
+   } or do {
+      require DynaLoader;
+      @ISA=qw(DynaLoader);
+      bootstrap Gimp::UI $VERSION;
+   }
 }

 =head1 NAME