From 65f23eea6a663058c714d03b417b68b5b16b1fee Mon Sep 17 00:00:00 2001
From: mertz
Date: Mon, 22 Sep 2003 10:03:31 +0000
Subject: creating fake tclConfigs.sh and tkConfigs.sh so that ./configure
 works during the Tk::Zinc configuration process - removing un-needed
 directories and files when building the tar file

---
 Perl/CPANising-tkzinc.pl | 42 +++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 41 insertions(+), 1 deletion(-)

diff --git a/Perl/CPANising-tkzinc.pl b/Perl/CPANising-tkzinc.pl
index b340b14..f92f926 100644
--- a/Perl/CPANising-tkzinc.pl
+++ b/Perl/CPANising-tkzinc.pl
@@ -33,13 +33,53 @@ die "version in $0 and Zinc.pm must be identical" unless $ver == $version ;
 system ('cp -p debian/changelog Changes');
 
 ## the CPANising-tkzinc.pl script is not supposed to be distributed
-system ('rm -rf sandbox debian CPANising-tkzinc.pl');
+## neither the sandbox, nor debian or redhat dirs
+system ('rm -rf sandbox debian redhat CPANising-tkzinc.pl');
+
+## the following tcl-needed (or python-needed) dirs are deleted:
+system ('rm -rf demos library tclconfig tests Python');
+
 
 # removing the .cvsignore files
 system ('find . -name .cvsignore | xargs rm -f');
 
+# renaming README.PERL in README
+system ('mv  README README.FULL ; mv README.PERL README');
+
+
+# the following dir and 2 files are dummy configure
+# files still needed for building Tk::Zinc for Perl.
+# They will soon disapear!
+system ('mkdir fake_TCL_libs');
+open (TCL , ">fake_TCL_libs/tclConfig.sh");
+print TCL <<EOF
+# tclConfig.sh --
+# This shell script is generated automatically by Tcl's
+# configure script.
+# It is currently necessary, but not used
+# to configure Tk::Zinc for perl.
+TCL_SRC_DIR='/fake/directory/not/need/for/ptk/install'
+EOF
+    ;
+
+close TCL;
+
+open (TK , ">fake_TCL_libs/tkConfig.sh");
+print TK <<EOF
+# tkConfig.sh --
+# This shell script is generated automatically by Tcl's
+# configure script.
+# It is currently necessary, but not used
+# to configure Tk::Zinc for perl.
+TK_SRC_DIR='/fake/directory/not/need/for/ptk/install'
+EOF
+    ;
+
+# end of the hack!
+
 # creating the MANIFEST file
 use ExtUtils::Manifest qw( mkmanifest );
+$ExtUtils::Manifest::Quiet = 1;
 &mkmanifest();
 
 # and finally creating the tar file, ready to upload
-- 
cgit v1.1