X-Git-Url: http://git.hcoop.net/bpt/emacs.git/blobdiff_plain/af559a4e281a37d2accf2be5e1dce8e3e8db214f..d942e12a70d6ac540eb621cf92de29f1c6a47958:/make-dist diff --git a/make-dist b/make-dist index 3c78a1ab79..a09d988a85 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,50 +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 \ - 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 -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 +### 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 leim -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. @@ -200,7 +211,7 @@ if [ $update = yes ]; then echo "Updating Info files" - (cd man; make info) + (cd man; make -f Makefile.in srcdir=. info) echo "Updating finder, custom and autoload data" @@ -217,7 +228,16 @@ 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}'" @@ -238,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. @@ -260,8 +280,8 @@ echo "Creating subdirectories" 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 + nt nt/inc nt/inc/sys nt/inc/arpa nt/inc/netinet nt/icons \ + etc etc/e lock info man msdos vms; do mkdir ${tempdir}/${subdir} done @@ -421,6 +441,10 @@ echo "Making links to \`nt/inc/netinet'" (cd nt/inc/netinet ln [a-z]*.h ../../../${tempdir}/nt/inc/netinet) +echo "Making links to \`nt/icons'" +(cd nt/icons + ln [a-z]*.ico ../../${tempdir}/nt/icons) + echo "Making links to \`msdos'" (cd msdos ln ChangeLog emacs.ico emacs.pif ../${tempdir}/msdos @@ -464,6 +488,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) @@ -473,10 +498,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