use ExtUtils::MakeMaker;

my $dir = '.';

eval 'use Font::TFM';
if ($@ eq '' and defined $Font::TFM::TEXFONTSDIR) {
	print <<EOF;
	It seems you already have Font::TFM installed -- you might
	want to keep the old value of TEXFONTSDIR.
EOF
	$dir = $Font::TFM::TEXFONTSDIR;
}

$dir = prompt "The search path for tfm files (value of \$Font::TFM::TEXFONTSDIR)\n", $dir;


sub MY::processPL {
	package MY;
	my $inherited = shift->SUPER::processPL(@_);
	$inherited =~ s/(\$\(PERL\) .* TFM.pm.PL)/$1 -dTEXFONTSDIR=$dir/;
	$inherited;
}

sub MY::postamble {
	my $src = MM->catfile('backup', 'TFM.pm.src');
	my $dest = MM->catfile('backup', 'TFM.pm');
qq!$dest : Makefile
	\$\(PERL\) -pe 's/^\\\$\$VERSION = .*/\\\$\$VERSION = \$(VERSION);/' $src > $dest
!
}

WriteMakefile(
	'NAME'	=>	'Font::TFM',
	'VERSION_FROM' =>	'TFM.pm.PL',
	'PL_FILES' =>	{ 'TFM.pm.PL' => 'TFM.pm' },
	'PM' =>		{ 'TFM.pm' => '$(INST_LIBDIR)/TFM.pm' },
	'clean' =>	{ FILES => 'TFM.pm' },
	'dist'	=>	{
			COMPRESS =>	'gzip -9f',
			SUFFIX =>	'.gz',
			DIST_DEFAULT =>	'backup/TFM.pm tardist',
			POSTOP =>	'mv $(DISTNAME)-$(VERSION).tar.gz ../'
			},
	);