Remove U/mksample

The glossary part of this has been removed, and the script has been
moved to Porting/

diff --git a/README b/README
index 459f048..795f51c 100644 (file)
--- a/README
+++ b/README
@@ -183,7 +183,7 @@ Contents of this directory:
 
     again
 
-(k) Run U/mksample to freshen the Porting/config* and Porting/Glossary.
+(k) Run Porting/mksample to freshen the Porting/config*.
     Adjust the various compile-time options (e.g. 64bit, threads) as
     you see fit.
     You can skip this phase, it's not essential, just good housekeeping.
@@ -191,6 +191,8 @@ Contents of this directory:
     Most of this only works if you have run the core-tests with the new
     generated files
 
+(kk) Run U/mkgloss.pl to freshen Porting/Glossary
+
     You should at least check
 
     $ perl U/mkgloss.pl | diff Porting/Glossary -

diff --git a/U/README.dist b/U/README.dist
index fa70d26..37dd773 100644 (file)
--- a/U/README.dist
+++ b/U/README.dist
@@ -53,9 +53,13 @@ Instructions:
 8.  Edit U/mkglossary and/or U/mkgloss.pl to point to your dist-3.0pl70
     location.  (See comments at the top.)
 
-9.  Run the U/mksample script to update the contents of the Porting/
+9.  Run the Porting/mksample script to update the contents of the Porting/
     subdirectory, or run all parts by hand. (see README)
 
+    NB: this script used to be U/mksample replaced by Porting/mksample;
+    see Porting/pumpkin.pod instead for current documentation on its
+    use.
+
 10. Let me know about any changes, corrections, or enhancements.
 
 Things to watch out for:

diff --git a/U/mkglossary b/U/mkglossary
index 64c7965..9c5c3de 100755 (executable)
--- a/U/mkglossary
+++ b/U/mkglossary
@@ -17,7 +17,7 @@ my @perl_units = glob ("$PWD/U/*/*.U");
 push (@perl_units, @std_units);
 
 # Get the list of config.sh symbols.  Be sure this is up to date!
-# (I run the U/mksample script first to be sure.)
+# (I run the Porting/mksample script first to be sure.)
 open my $wanted, "< $PWD/Porting/config.sh" or die "$0: open $PWD/Wanted: $!\n";
 my @WANTED = map  { $_->[0] }
             sort { $a->[1] cmp $b->[1] }

diff --git a/U/mksample b/U/mksample
deleted file mode 100755 (executable)
index b4b2571..0000000
--- a/U/mksample
+++ /dev/null
@@ -1,49 +0,0 @@
-#!/bin/sh
-# This is the script I use to keep the Porting/ stuff up-to-date
-# with the latest Configure.
-#  Andy Dougherty      July 14, 1998
-
-rm -f config.sh Policy.sh
-cat >Policy.sh <<'EOP'
-libswanted="cl pthread $libswanted"
-EOP
-
-sh ./Configure -Dprefix=/opt/perl \
-       -Dcf_by='merijn' \
-       -Dcf_email='yourname@yourhost.yourplace.com' \
-       -Dperladmin='yourname@yourhost.yourplace.com' \
-       -Dmydomain='.yourplace.com' \
-       -Dmyhostname='yourhost' \
-       -Duse64bitint \
-       -Dusedevel \
-       -dE
-test $? = 0 || exit 1
-chmod u+w Porting Porting/Glossary Porting/config*
-cp config.sh Porting/config.sh
-sh config_h.SH
-cat <<'EOCP' > Porting/config_H
-/* This file (config_H) is a sample config.h file.  If you are unable
-   to successfully run Configure, copy this file to config.h and
-   edit it to suit your system.
-*/
-EOCP
-cat config.h >> Porting/config_H
-rm config.sh config.h
-if newer Configure Porting/Glossary; then
-    pwd=`pwd`
-    U/mkgloss.pl >Porting/Glossary
-#    cd Porting
-#    rm -f Glossary.rej
-#    # The standard 'dist' units contain some strings that upset
-#    # pod2man.  This patch silences pod2man's warnings.
-#    patch < $pwd/U/Glossary.patch
-#    if test -f Glossary.rej; then
-#      echo 'Check possible failed patch to Porting/Glossary!'
-#      exit 2
-#      fi
-#    cd $pwd
-    fi
-# Remove detritus.
-#if test -f makeaperl -a -f pod/Makefile; then
-#    rm -f cflags config.h cppstdin makeaperl makedepend makedir Makefile myconfig pod/Makefile Policy.sh writemain x2p/cflags x2p/Makefile Obsolete Wanted
-#    fi