diff options
| -rw-r--r-- | Makefile.PL | 102 |
1 files changed, 0 insertions, 102 deletions
diff --git a/Makefile.PL b/Makefile.PL deleted file mode 100644 index 7753b22..0000000 --- a/Makefile.PL +++ /dev/null @@ -1,102 +0,0 @@ -# this code has been developped by Somanos Sar from CENA -# and modified par C.Mertz from CENA -# $Id$ - -use 5.00404; -use Cwd; -use Config; -use File::Basename; -use Carp; - - -BEGIN -{ - my $IsWin32 = ($^O eq 'MSWin32' || $Config{'ccflags'} =~ /-D_?WIN32_?/); -} - -my %opt = parse_opt(); - - -print "Trying to find a libGL by myself (may be long)...\n"; -my $gl_lib = guess_libs('libGL.so'); -if ($gl_lib) -{ - my $gl_lib_a = guess_libs('libGL.a'); - if ($gl_lib_a) { - warn ("### you have both libGL.so [in $gl_lib] and libGL.a [in $gl_lib_a]. -### Tk::Zinc may have trouble building a correct libTkzinc3.x.yy.so library. -### We suggest you to put the libGL.a aside ....") - } - $gl_lib = 'yes'; -} -else -{ - $gl_lib = 'no'; -} - -# Directories -my $prefix=""; -$prefix = "--prefix=" . $opt{'--prefix'} if ($opt{'--prefix'}); - - -############################################# -# SUBROUTINES -############################################# - -# Try to guess which library are to be use for tk and tcl -sub guess_libs -{ - my $lib_name = shift; - - my @libs = split(/[ \t]+/, $Config{'libpth'}); - foreach my $lib (@libs) - { - my @configs = (`find /usr/lib -name $lib_name`, `find /usr/local/lib -name $lib_name` , ); - if (@configs) - { - print "Using $configs[0]\n"; - $configs[0] = dirname($configs[0]); - return $configs[0]; - } - } - return undef; -} - -# Parse option from command line -sub parse_opt -{ - my $args = join(/_IFS_/, @ARGV); - my @tokens = split(/_IFS_/, $args); - my %options; - - foreach my $token (@tokens) - { - my ($key, $value) = split(/[ =]+/, $token); - $options{$key} = $value; - } - return %options; -} - - - -#print "Installing in $prefix gl_lib=$gl_lib\n"; - -my @withTclTk=(); -if (-f "fake_TCL_libs/tclConfig.sh" && - -f "fake_TCL_libs/tkConfig.sh") { - @withTclTk = ("--with-tcl=fake_TCL_libs", "--with-tk=fake_TCL_libs"); -} -else { - print "### configure will search tcl / tk configs in thje system\n"; -} -my @args = ("./configure", - "--enable-ptk=yes", - "--enable-gl=$gl_lib", - "--enable-shared=yes", - @withTclTk, - $prefix, -# INSTALL_PERL=\"yes\"" - ); -print "\nConfiguring with... ", join (' ', @args), "\n"; - -system (@args); |