gnome-perl-introspection r27 - in trunk/PDF-Poppler: . lib/PDF

[tsch svn gnome org]

Author: tsch
Date: Sun Nov  2 21:20:40 2008
New Revision: 27
URL: http://svn.gnome.org/viewvc/gnome-perl-introspection?rev=27&view=rev

Log:
Adapt to the new G::O::I and gobject-introspection API and semantics.


Removed:
   trunk/PDF-Poppler/poppler.idl
Modified:
   trunk/PDF-Poppler/Build.PL
   trunk/PDF-Poppler/lib/PDF/Poppler.pm

Modified: trunk/PDF-Poppler/Build.PL
==============================================================================
--- trunk/PDF-Poppler/Build.PL	(original)
+++ trunk/PDF-Poppler/Build.PL	Sun Nov  2 21:20:40 2008
@@ -3,37 +3,14 @@
 use warnings;
 use Module::Build;
 
-my $wrapped_so = 'libpoppler-glib.so';
-my $idl = 'poppler.idl';
-my $wrapper_c = 'libpoppler-glib-i11n.c';
-my $wrapper_so = 'lib/PDF/Poppler/libpoppler-glib-i11n.so';
-my $wrapper_flags = `pkg-config --libs --cflags gobject-introspection`;
-chomp $wrapper_flags;
-
-my $cmd = "g-idl-compiler -l $wrapped_so $idl -o $wrapper_c";
-0 == system $cmd
-  or die "Generating $wrapper_c failed";
-
-$cmd = "gcc -shared $wrapper_flags $wrapper_c -o $wrapper_so";
-0 == system $cmd
-  or die "Generating $wrapper_so failed";
-
-my $pm_file = 'lib/PDF/Poppler.pm';
-
 my $builder = Module::Build -> new(
   module_name       => 'PDF::Poppler',
   license           => 'lgpl',
   dist_author       => 'Torsten Schoenfeld <kaffeetisch at gmx dot de>',
-  dist_version_from => $pm_file,
-  pm_files          => {
-      $pm_file => $pm_file,
-      $wrapper_so => $wrapper_so,
-  },
   requires          => {
       'Glib::Object::Introspection' => 0.01,
       'Gtk2'                        => 1.080,
   },
-  add_to_cleanup    => [ 'PDF-Poppler-*', $wrapper_c, $wrapper_so ],
 );
 
 $builder -> create_build_script();

Modified: trunk/PDF-Poppler/lib/PDF/Poppler.pm
==============================================================================
--- trunk/PDF-Poppler/lib/PDF/Poppler.pm	(original)
+++ trunk/PDF-Poppler/lib/PDF/Poppler.pm	Sun Nov  2 21:20:40 2008
@@ -63,22 +63,7 @@
 our $VERSION = '0.01';
 
 sub import {
-  my $filename = "PDF/Poppler/libpoppler-glib-i11n.so";
-  my $full_filename = undef;
-
-  foreach my $prefix (@INC) {
-    my $tmp = "$prefix/$filename";
-    if (-f $tmp) {
-      $full_filename = $tmp;
-      last;
-    }
-  }
-
-  die "Can't find $filename in \ INC" unless defined $full_filename;
-
-  Glib::Object::Introspection -> setup("libpoppler-glib.so",
-                                       $full_filename,
-                                       "Poppler", "PDF::Poppler");
+  Glib::Object::Introspection -> setup(Poppler => '0.8', 'PDF::Poppler');
 }
 
 # --------------------------------------------------------------------------- #