/usr/local/CPAN/Gtk2-SourceView/Makefile.PL

• package main
  • MY::postamble
• EOF

use 5.008;
use strict;
use warnings;
use Cwd;
use File::Spec;
use ExtUtils::MakeMaker;

# minimum required version of dependancies we need to build
our %build_reqs = (
	'perl-ExtUtils-Depends'   => '0.2',
	'perl-ExtUtils-PkgConfig' => '1.0',
	'perl-Glib'               => '1.100',
	'perl-Gtk2'               => '1.100',
	'perl-Gnome2-Print'       => '0.60',
	'GtkSourceView'           => '0.5.0',
);

our %prereqs = (
	'Glib'                => $build_reqs{'perl-Glib'},
	'Gtk2'                => $build_reqs{'perl-Gtk2'},
	'Gnome2::Print'       => $build_reqs{'perl-Gnome2-Print'},
	'ExtUtils::Depends'   => $build_reqs{'perl-ExtUtils-Depends'},
	'ExtUtils::PkgConfig' => $build_reqs{'perl-ExtUtils-PkgConfig'},
);

# Writing a fake Makefile ensures that CPAN will pick up the correct
# dependencies and install them.
unless (eval "use ExtUtils::Depends;"
           . "use ExtUtils::PkgConfig;"
	   . "use Gtk2::CodeGen;"
           # just seeing if Glib is available isn't enough, make sure
           # it's recent enough, too 
           . "use Glib '$build_reqs{'perl-Glib'}';"
           . "use Gtk2 '$build_reqs{'perl-Gtk2'}';"
           . "use Gnome2::Print '$build_reqs{'perl-Gnome2-Print'}';"
           . "use Glib::MakeHelper;"
           . "1") {
   warn "$@\n";
   WriteMakefile(
         PREREQ_FATAL => 1,
         PREREQ_PM    => \%prereqs,
   );
   exit 1; # not reached
}

mkdir 'build', 0777;

our %pkgcfg = ExtUtils::PkgConfig->find ('gtksourceview-1.0 >= '
				     .$build_reqs{GtkSourceView});

# now we're ready to start creating the makefile.
# we need to use ExtUtils::Depends to get relevant information out of
# the Glib extension, and to save config information for other modules which
# will chain from this one.

our @xs_files = <xs/*.xs>;
our %pm_files = (
    'SourceView.pm' => '$(INST_LIBDIR)/SourceView.pm',
);
our %pod_files = (
    'SourceView.pm' => '$(INST_MAN3DIR)/Gtk2::SourceView.$(MAN3EXT)',
    Glib::MakeHelper->do_pod_files (@xs_files),
);

ExtUtils::PkgConfig->write_version_macros ("build/gtksourceviewperl-version.h",
                                           'gtksourceview-1.0' => 'GTK_SOURCE_VIEW');

#
# autogeneration
#
Gtk2::CodeGen->parse_maps ('gtksourceviewperl');
Gtk2::CodeGen->write_boot (ignore => '^Gtk2::SourceView$');

my $sview = ExtUtils::Depends->new ('Gtk2::SourceView', 'Gnome2::Print', 'Gtk2', 'Glib');
$sview->set_inc ($pkgcfg{cflags} . ' -I./build ');
$sview->set_libs ($pkgcfg{libs});
$sview->add_xs (@xs_files);
$sview->add_pm (%pm_files);
my $cwd = cwd();
$sview->add_typemaps (File::Spec->catfile($cwd, 'build/gtksourceviewperl.typemap'));
$sview->install (qw(gtksourceviewperl.h
		build/gtksourceviewperl-autogen.h
		build/gtksourceviewperl-version.h));
$sview->save_config ('build/IFiles.pm');

WriteMakefile(
    NAME          => 'Gtk2::SourceView',
    VERSION_FROM  => 'SourceView.pm', # finds $VERSION
    PREREQ_PM     => \%prereqs,
    ABSTRACT_FROM => 'SourceView.pm', # retrieve abstract from module
    XSPROTOARG    => '-noprototypes',
    MAN3PODS	  => \%pod_files,
    $sview->get_makefile_vars,
);

sub MY::postamble
{
	return Glib::MakeHelper->postamble_clean ()
	     . Glib::MakeHelper->postamble_docs (@main::xs_files)
	     . Glib::MakeHelper->postamble_rpms (
		'GTK_SOURCE_VIEW' => $build_reqs{'GtkSourceView'},
		'PERL_EXTUTILS_DEPENDS' => 
			$build_reqs{'perl-ExtUtils-Depends'},
		'PERL_EXTUTILS_PKGCONFIG' => 
			$build_reqs{'perl-ExtUtils-PkgConfig'},
		'PERL_GLIB' => $build_reqs{'perl-Glib'},
		'PERL_GTK' => $build_reqs{'perl-Gtk2'},
	       );
}