From 960cdf29197bc3f5922110cf26627aa9709ac79b Mon Sep 17 00:00:00 2001
From: cvs2svn
Date: Fri, 10 Jun 2005 10:29:11 +0000
Subject: This commit was manufactured by cvs2svn to create branch 'bogue40'.

---
 Perl/Makefile.PL | 158 -------------------------------------------------------
 1 file changed, 158 deletions(-)
 delete mode 100644 Perl/Makefile.PL

(limited to 'Perl/Makefile.PL')

diff --git a/Perl/Makefile.PL b/Perl/Makefile.PL
deleted file mode 100644
index dd27837..0000000
--- a/Perl/Makefile.PL
+++ /dev/null
@@ -1,158 +0,0 @@
-use 5.006;
-use Tk;
-use Config;
-use Tk::Config;
-use ExtUtils::MakeMaker;
-use strict;
-
-my $TkLibDir = $Tk::library;
-my $platform = $Tk::platform;
-
-my $VERSION = SEEexport2cpan;
-
-
-if (!$TkLibDir)
-{
-    print stderr "==================================================================\n";
-    print stderr "Could not find the Perl/Tk (pTk) library.\n";
-    print stderr "Please, install first Perl/Tk interface before installing Tk::Zinc\n";
-    print stderr "==================================================================\n";
-    die;
-}
-
-
-print "Configuring version $VERSION for $platform platform...\n";
-print "Using $TkLibDir as Tk library...\n";
-
-my @GENERIC_C = ('Tabular.c', 'Rectangle.c', 'Arc.c', 'Curve.c',
-		 'Item.c', 'PostScript.c', 'Attrs.c', 'Draw.c', 'Geo.c', 'List.c',
-		 'perfos.c', 'Transfo.c', 'Group.c', 'Icon.c', 'Text.c', 'Image.c', 'Color.c',
-		 'Field.c', 'Triangles.c', 'Window.c', 'tkZinc.c');
-
-my @ATC_C = ('OverlapMan.c', 'Track.c', 'Reticle.c', 'Map.c', 'MapInfo.c');
-
-my @WIN_C = ('WinPort.c');
-
-my @C;
-
-my $WIN = ($platform =~ /win/i);
-
-push @C, @GENERIC_C ;
-
-my $NeededLibs = ['-L/usr/X11R6/lib -lXext -lX11 -lGLU -lGL -L.'];
-
-if ($WIN) {
-    push @C, @WIN_C;
-    $NeededLibs = ['-lglu32 -lopengl32']
-}
-my $ZincObj = "Zinc" . $Config{"_o"};
-
-my $INC = "-I. -I$TkLibDir -I$TkLibDir/pTk -I$TkLibDir/X11";
-
-unless ($WIN) {
-  $INC .= " -I/usr/X11R6/include";
-}
-
-#For some reason which the author of ExtUtils::MM_Unix forget, Unix machines like to have
-#PERL_DL_NONLAZY set for tests. This is FALSE for TkZinc.
-
-if ($] >= 5.008000) {
-  *ExtUtils::MM_Unix::test_via_harness = sub {
-    my($self, $perl, $tests) = @_;
-#    return $self->SUPER::test_via_harness("PERL_DL_NONLAZY=1 $perl", $tests);
-    # I should use the SUPER method, but this needs some import tunning...
-    return ExtUtils::MM_Any::test_via_harness($self, $perl, $tests);
-  };
-
-#Again, the PERL_DL_NONLAZY thing.
-  *ExtUtils::MM_Unix::test_via_script = sub {
-    my($self, $perl, $script) = @_;
-#    return $self->SUPER::test_via_script("PERL_DL_NONLAZY=1 $perl", $script);
-    # I should use the SUPER method, but this needs some import tunning...
-    return ExtUtils::MM_Any::test_via_script($self, $perl, $script);
-  };
-}
-
-# See lib/ExtUtils/MakeMaker.pm for details of how to influence
-# the contents of the Makefile that is written.
-WriteMakefile(
-              'ABSTRACT'        => 'a canvas offering groups, tranformations, transparency, color gradient...',
-	      'AUTHOR'          => 'Patrick Lecoanet <lecoanet@cena.fr>',
-	      'NAME'		=> 'Tk::Zinc',
-	      'VERSION'	        => $VERSION,
-	      'PREREQ_PM'	=> $WIN ? {Tk => 8.004} : {Tk => 8.0},
-	      'LIBS'		=> $NeededLibs, 
-	      'DEFINE'		=> &get_flags,
-	      'INC'             => $INC,
-	      'C'               => [@C],
-	      'XS_VERSION'      => $Tk::Config::VERSION,
-	      'XS'              => {'Zinc.xs' => 'Zinc.c'},
-	      'linkext'         => {LINKTYPE => 'dynamic'},
-	      'depend'          => {$ZincObj => '$(O_FILES) Zinc.c'},
-	      'LDFROM'		=> "\$(O_FILES) $ZincObj",
-	      );
-
-sub get_flags {
-    my %DEF_FLAGS = ('GL'        => 1,
-		     'SHAPE'     => 1,
-		     'GL_DAMAGE' => 1,
-		     'ATC'        => 1
-		     );
-    
-    foreach my $arg (@ARGV) {
-	print "$arg ....\n";
-	my ($name, $value) = split(/[=]+/, $arg);
-	if ($name =~ /(with-gl)/i) {
-	    if ($value =~ /no/i) {
-		$DEF_FLAGS{'GL'} = 0;
-		$DEF_FLAGS{'GL_DAMAGE'} = 0;
-	    }
-	}
-	elsif ($name =~ /(with-atc)/i) {
-	    if ($value =~ /no/i) {
-		$DEF_FLAGS{'ATC'} = 0;
-	    }
-	}
-	elsif ($name =~ /(with-shape)/i) {
-	    if ($value =~ /no/i) {
-		$DEF_FLAGS{'SHAPE'} = 0;
-	    }
-	}
-    }
-    
-    my $defines = '-DPTK';
-
-    if ($WIN) {
-	#
-	# No shape extension on Windows (planned later).
-	$DEF_FLAGS{'SHAPE'} = 0;
-	#
-	# Visual C++ does not define __STDC__ by default
-	$defines .= ' -D__STDC__';
-    }
-
-    print "Configuring with:\n    ";
-    foreach my $flag (keys %DEF_FLAGS) {
-	print "$flag=", $DEF_FLAGS{$flag} ? 'ok' : 'no', " ";
-	if ($DEF_FLAGS{$flag}) {	    
-	    $defines = $defines . " " . "-D$flag";
-	    if ($flag eq 'ATC') {
-		push @C, @ATC_C
-	    }
-	}
-    }
-    if ($Tk::VERSION =~ /^800/) {
-      $defines .= " -DPTK_800";
-      print "PTK=800";
-    } else {
-      print "PTK=804";
-    }
-    print "\n";
-    return $defines;
-}
-
-#
-# For the demo
-#
-# perl -Mblib demos/zinc-demos
-
-- 
cgit v1.1