X-Git-Url: https://git.hcoop.net/bpt/emacs.git/blobdiff_plain/5f8d02bedad1af9cfdbcb8e8f7ad9ee285a4ee76..aa924debea65aa6636dd5a202e44f7b91c250281:/make-dist diff --git a/make-dist b/make-dist index f65e4f499f..9535e18b7d 100755 --- a/make-dist +++ b/make-dist @@ -6,7 +6,7 @@ #### be distributed. This means that if you add a file with an odd name, #### you should make sure that this script will include it. -# Copyright (C) 1995, 1997 Free Software Foundation, Inc. +# Copyright (C) 1995, 1997, 1998 Free Software Foundation, Inc. # # This file is part of GNU Emacs. # @@ -33,10 +33,11 @@ progname="$0" ### Print out each line we read, for debugging's sake. ### set -v -## Don't protect any files. +## Don't restrict access to any files. umask 0 update=yes +check=yes clean_up=no make_tar=no newer="" @@ -56,6 +57,10 @@ while [ $# -gt 0 ]; do "--no-update" ) update=no ;; + ## This option says don't check for bad file names, etc. + "--no-check" ) + check=no + ;; ## This option tells make-dist to make the distribution normally, then ## remove all files older than the given timestamp file. This is useful ## for creating incremental or patch distributions. @@ -86,13 +91,15 @@ if [ ! -d src -o ! -f src/lisp.h -o ! -d lisp -o ! -f lisp/version.el ]; then fi ### Find where to run Emacs. +### (We don't accept EMACS=t as an answer, since that probably only means +### that the shell is running in an Emacs window.) if [ $update = yes ]; then if [ -f src/emacs ]; then EMACS=`pwd`/src/emacs else - if [ x$EMACS = x ]; + if [ "x$EMACS" = "x" -o "x$EMACS" = "xt" ]; then echo You must specify the EMACS environment variable 2>&1 exit 1 @@ -143,46 +150,54 @@ them, and try again." >&2 exit 1 fi -### Check for .elc files with no corresponding .el file. -ls -1 lisp/[a-z]*.el lisp/[a-z]*/[a-z]*.el | sed 's/\.el$/.elc/' > /tmp/el -ls -1 lisp/[a-z]*.elc lisp/[a-z]*/[a-z]*.elc > /tmp/elc -bogosities="`comm -13 /tmp/el /tmp/elc`" -if [ "${bogosities}" != "" ]; then - echo "The following .elc files have no corresponding .el files:" - echo "${bogosities}" -fi -rm -f /tmp/el /tmp/elc - -### Check for .el files with no corresponding .elc file. -(cd lisp; ls -1 [a-z]*.el [a-z]*/[a-z]*.el) > /tmp/el -(cd lisp; ls -1 [a-z]*.elc [a-z]*/[a-z]*.elc) | sed 's/\.elc$/.el/' > /tmp/elc -losers="`comm -23 /tmp/el /tmp/elc`" -bogosities= -for file in $losers; do - file1=`echo $file | sed -e "s|.*/||"` - if ! grep -q "dontcompilefiles:.* $file1\($\| \)" lisp/Makefile; then - case $file in - site-init.el | site-load.el | site-start.el | default.el) - ;; - term/*) - ;; - *) - bogosities="$file $bogosities" - ;; - esac +### Find where to run Emacs. +if [ $check = yes ]; +then + ### Check for .elc files with no corresponding .el file. + ls -1 lisp/[a-z]*.el lisp/[a-z]*/[a-z]*.el \ + leim/[a-z]*.el leim/[a-z]*/[a-z]*.el | sed 's/\.el$/.elc/' > /tmp/el + ls -1 lisp/[a-z]*.elc lisp/[a-z]*/[a-z]*.elc \ + leim/[a-z]*.elc leim/[a-z]*/[a-z]*.elc > /tmp/elc + bogosities="`comm -13 /tmp/el /tmp/elc`" + if [ "${bogosities}" != "" ]; then + echo "The following .elc files have no corresponding .el files:" + echo "${bogosities}" fi -done -if [ x"${bogosities}" != x"" ]; then - echo "The following .el files have no corresponding .elc files:" - echo "${bogosities}" -fi -rm -f /tmp/el /tmp/elc + rm -f /tmp/el /tmp/elc + + ### Check for .el files with no corresponding .elc file. + (cd lisp; ls -1 [a-z]*.el [a-z]*/[a-z]*.el ; \ + cd ../leim; ls -1 [a-z]*.el [a-z]*/[a-z]*.el) > /tmp/el + (cd lisp; ls -1 [a-z]*.elc [a-z]*/[a-z]*.elc; \ + cd ../leim; ls -1 [a-z]*.elc [a-z]*/[a-z]*.elc) | sed 's/\.elc$/.el/' > /tmp/elc + losers="`comm -23 /tmp/el /tmp/elc`" + bogosities= + for file in $losers; do + file1=`echo $file | sed -e "s|.*/||"` + if ! grep -q "dontcompilefiles:.* $file1\($\| \)" lisp/Makefile; then + case $file in + site-init.el | site-load.el | site-start.el | default.el) + ;; + term/*) + ;; + *) + bogosities="$file $bogosities" + ;; + esac + fi + done + if [ x"${bogosities}" != x"" ]; then + echo "The following .el files have no corresponding .elc files:" + echo "${bogosities}" + fi + rm -f /tmp/el /tmp/elc -### Check for .el files that would overflow the 14-char limit if compiled. -long=`find lisp -name '[a-zA-Z0-9]??????????*.el' -print` -if [ "$long" != "" ]; then - echo "The following .el file names are too long:" - echo "$long" + ### Check for .el files that would overflow the 14-char limit if compiled. + long=`find lisp leim -name '[a-zA-Z0-9]??????????*.el' -print` + if [ "$long" != "" ]; then + echo "The following .el file names are too long:" + echo "$long" + fi fi ### Make sure configure is newer than configure.in. @@ -198,18 +213,31 @@ then (cd man; make info) - echo "Recompiling Lisp files" + echo "Updating finder, custom and autoload data" - $EMACS -batch -f batch-byte-recompile-directory lisp + (cd lisp; make updates EMACS=$EMACS) - echo "Updating finder, custom and autoload data" + echo "Updating leim-list.el" - (cd lisp; make updates) + (cd leim; make leim-list.el EMACS=$EMACS) + + echo "Recompiling Lisp files" + + $EMACS -batch -f batch-byte-recompile-directory lisp leim fi echo "Making lisp/MANIFEST" -(cd lisp; head -1 [!=]*.el | grep '^;' | sed -e 's/;;; //' > MANIFEST) +(cd lisp; + files=`echo [!=]*.el | sed -e 's/ subdirs.el / /' -e 's/ default.el / /'` + for dir in [!=]*; do + if [ -d $dir ] && [ $dir != term ] && [ $dir != RCS ]; then + echo $dir + thisdir=`echo $dir/[!=]*.el | sed -e 's/ subdirs.el / /'` + files="$files $thisdir" + fi + done + head -1 $files | grep '^;' | sed -e 's/;;; //' | sort > MANIFEST) echo "Creating staging directory: \`${tempparent}'" @@ -230,7 +258,7 @@ mkdir ${tempdir} ### tar file; this means that people can start reading the INSTALL and ### README while the rest of the tar file is still unpacking. Whoopee. echo "Making links to top-level files" -ln GETTING.GNU.SOFTWARE INSTALL PROBLEMS README BUGS move-if-change ${tempdir} +ln GETTING.GNU.SOFTWARE INSTALL README BUGS move-if-change ${tempdir} ln ChangeLog Makefile.in configure configure.in ${tempdir} ln config.bat make-dist update-subdirs vpath.sed ${tempdir} ### Copy these files; they're cross-filesystem symlinks. @@ -245,7 +273,7 @@ echo "Updating version number in README" '$1 " " $2 " " $3 " " $4 " " $5 == "This directory tree holds version" { $6 = version; print $0 } $1 " " $2 " " $3 " " $4 " " $5 != "This directory tree holds version"' \ version=${version} README > tmp.README - mv tmp.README README) + mv -f tmp.README README) echo "Creating subdirectories" @@ -253,7 +281,7 @@ for subdir in lisp site-lisp leim real-leim real-leim/CXTERM-DIC \ real-leim/SKK-DIC real-leim/skk real-leim/quail \ src src/m src/s src/bitmaps lib-src oldXMenu lwlib \ nt nt/inc nt/inc/sys nt/inc/arpa nt/inc/netinet \ - etc etc/e lock cpp info man msdos vms; do + etc etc/e lock info man msdos vms; do mkdir ${tempdir}/${subdir} done @@ -304,7 +332,7 @@ echo "Making links to \`leim' and its subdirectories for the LEIM distribution" ### Don't distribute TAGS, or =*.el files. (cd leim ln Makefile.in makefile.nt ../${tempdir}/real-leim - ln ChangeLog.? README ../${tempdir}/real-leim + ln ChangeLog README ../${tempdir}/real-leim ln CXTERM-DIC/*.tit ../${tempdir}/real-leim/CXTERM-DIC ln SKK-DIC/README SKK-DIC/SKK-JISYO.L ../${tempdir}/real-leim/SKK-DIC @@ -337,12 +365,12 @@ echo "Making links to \`src'" # test -f appears to succeed for a symlink if test -L ../${tempdir}/src/$file; then rm ../${tempdir}/src/$file - cp $file ../${tempdir}/src + cp -p $file ../${tempdir}/src chmod a-w ../${tempdir}/src/$file fi else rm ../${tempdir}/src/$file - cp $file ../${tempdir}/src + cp -p $file ../${tempdir}/src chmod a-w ../${tempdir}/src/$file fi done @@ -456,6 +484,7 @@ echo "Making links to \`etc'" fi done cd ../${tempdir}/etc + rm -f fns*.el rm -f DOC* *~ \#*\# *.dvi *.log *.orig *.rej *,v =* core rm -f TAGS) @@ -465,10 +494,6 @@ echo "Making links to \`etc/e'" cd ../../${tempdir}/etc/e rm -f *~ \#*\# *,v =* core) -echo "Making links to \`cpp'" -(cd cpp - ln cccp.c cexp.y Makefile README ../${tempdir}/cpp) - echo "Making links to \`info'" # Don't distribute backups or autosaves. (cd info