Mercurial > emacs
annotate make-dist @ 1678:62ecf0c5b54c
Give subprocess creation a way to find a valid current directory
for subprocesses when the buffer's default-directory is a handled
name.
* fileio.c (Funhandled_file_name_directory): New function.
(Qunhandled_file_name_directory): New file-name-handler operation.
(syms_of_fileio): Defsubr Sunhandled_file_name_directory, and
initialize and staticpro Qunhandled_file_name_directory.
* callproc.c (Fcall_process): Call Funhandled_file_name_directory
on the buffer's default directory. Do it earlier in the function
so there's less to GCPRO.
* process.c (create_process): Don't check the validity of the
buffer's default directory here...
(Fstart_process): Instead, do it here; if we call
Funhandled_file_name_directory here, there's less GCPROing to do.
* callproc.c (Fcall_process_region): Return the value returned by
Fcall_process.
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Sat, 12 Dec 1992 15:31:32 +0000 |
parents | 71a9637cab59 |
children | c4da55e6cfd3 |
rev | line source |
---|---|
616 | 1 #!/bin/sh |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
2 |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
3 #### make-dist: create an Emacs distribution tar file from the current |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
4 #### source tree. This basically creates a duplicate directory |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
5 #### structure, and then hard links into it only those files that should |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
6 #### be distributed. This means that if you add a file with an odd name, |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
7 #### you should make sure that this script will include it. |
616 | 8 |
9 progname="$0" | |
10 | |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
11 ### Exit if a command fails. |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
12 ### set -e |
616 | 13 |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
14 ### Print out each line we read, for debugging's sake. |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
15 ### set -v |
616 | 16 |
621 | 17 clean_up=yes |
18 make_tar=yes | |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
19 newer="" |
616 | 20 |
21 while [ $# -gt 0 ]; do | |
22 case "$1" in | |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
23 ## This option tells make-dist not to delete the staging directory |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
24 ## after it's done making the tar file. |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
25 "--no-clean-up" ) |
621 | 26 clean_up=no |
27 ;; | |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
28 ## This option tells make-dist not to make a tar file. Since it's |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
29 ## rather pointless to build the whole staging directory and then |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
30 ## nuke it, using this option also selects '--no-clean-up'. |
621 | 31 "--no-tar" ) |
32 make_tar=no | |
33 clean_up=no | |
616 | 34 ;; |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
35 ## This option tells make-dist to make the distribution normally, then |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
36 ## remove all files newer than the given timestamp file. This is useful |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
37 ## for creating incremental or patch distributions |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
38 "--newer") |
999 | 39 newer="$2" |
40 new_extension=".new" | |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
41 shift |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
42 ;; |
616 | 43 * ) |
44 echo "${progname}: Unrecognized argument: $1" >&2 | |
45 exit 1 | |
46 ;; | |
47 esac | |
48 shift | |
49 done | |
50 | |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
51 ### Make sure we're running in the right place. |
616 | 52 if [ ! -d src -o ! -f src/lisp.h -o ! -d lisp -o ! -f lisp/version.el ]; then |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
53 echo "${progname}: Can't find \`src/lisp.h' and \`lisp/version.el'." >&2 |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
54 echo "${progname} must be run in the top directory of the Emacs" >&2 |
616 | 55 echo "distribution tree. Cd to that directory and try again." >&2 |
56 exit 1 | |
57 fi | |
58 | |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
59 ### Find out which version of Emacs this is. |
616 | 60 version=`grep 'defconst[ ]*emacs-version' lisp/version.el \ |
1112 | 61 | sed -e 's/^.*"\([0-9][0-9]*\.[0-9][0-9]*\)\..*$/\1/'` |
616 | 62 if [ ! "${version}" ]; then |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
63 echo "${progname}: can't find current emacs version in \`./lisp/version.el'." >&2 |
616 | 64 exit 1 |
65 fi | |
66 | |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
67 ### Make sure the subdirectory is available. |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
68 tempparent="make-dist.tmp.$$" |
616 | 69 if [ -d ${tempparent} ]; then |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
70 echo "${progname}: staging directory \`${tempparent}' already exists. |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
71 Perhaps a previous invocation of \`${progname}' failed to clean up after |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
72 itself. Check that directories whose names are of the form |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
73 \`make-dist.tmp.NNNNN' don't contain any important information, remove |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
74 them, and try again." >&2 |
616 | 75 exit 1 |
76 fi | |
77 | |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
78 echo "Creating staging directory: \`${tempparent}'" |
616 | 79 mkdir ${tempparent} |
999 | 80 emacsname="emacs-${version}${new_extension}" |
616 | 81 tempdir="${tempparent}/${emacsname}" |
82 | |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
83 ### This trap ensures that the staging directory will be cleaned up even |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
84 ### when the script is interrupted in mid-career. |
994
5b2a1922c4d5
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
992
diff
changeset
|
85 if [ "${clean_up}" = yes ]; then |
5b2a1922c4d5
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
992
diff
changeset
|
86 trap "echo 'Interrupted...cleaning up the staging directory.'; rm -rf ${tempparent}; exit 1" 1 2 15 |
5b2a1922c4d5
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
992
diff
changeset
|
87 fi |
5b2a1922c4d5
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
992
diff
changeset
|
88 |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
89 echo "Creating top directory: \`${tempdir}'" |
616 | 90 mkdir ${tempdir} |
91 | |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
92 ### We copy in the top-level files before creating the subdirectories in |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
93 ### hopes that this will make the top-level files appear first in the |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
94 ### tar file; this means that people can start reading the INSTALL and |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
95 ### README while the rest of the tar file is still unpacking. Whoopee. |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
96 echo "Making links to top-level files." |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
97 ln GETTING.GNU.SOFTWARE INSTALL PROBLEMS README move-if-change ${tempdir} |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
98 ln ChangeLog Makefile.in build-install.in configure ${tempdir} |
1574
352988418dbd
* make-dist: Don't forget that the way to avoid filenames starting
Jim Blandy <jimb@redhat.com>
parents:
1560
diff
changeset
|
99 ln make-dist ${tempdir} |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
100 ### Copy config.sub; it's a cross-filesystem symlink. |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
101 cp config.sub ${tempdir} |
616 | 102 |
103 echo "Creating subdirectories." | |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
104 for subdir in lisp lisp/term local-lisp external-lisp \ |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
105 src src/m src/s lib-src oldXMenu \ |
1364 | 106 etc lock arch-lib cpp info man shortnames vms; do |
616 | 107 mkdir ${tempdir}/${subdir} |
108 done | |
109 | |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
110 echo "Making links to \`lisp'." |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
111 ### Don't distribute =*.el files, site-init.el, site-load.el, or default.el. |
616 | 112 (cd lisp |
113 ln [a-zA-Z]*.el ../${tempdir}/lisp | |
114 ln [a-zA-Z]*.elc ../${tempdir}/lisp | |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
115 ## simula.el doesn't keep abbreviations in simula.defns any more. |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
116 ## ln [a-zA-Z]*.defns ../${tempdir}/lisp |
616 | 117 ln ChangeLog README ../${tempdir}/lisp |
118 cd ../${tempdir}/lisp | |
119 rm -f site-init site-init.el site-init.elc | |
999 | 120 rm -f site-load site-load.el site-load.elc |
121 rm -f default default.el default.elc) | |
616 | 122 |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
123 echo "Making links to \`lisp/term'." |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
124 ### Don't distribute =*.el files. |
616 | 125 (cd lisp/term |
126 ln [a-zA-Z]*.el ../../${tempdir}/lisp/term | |
127 ln [a-zA-Z]*.elc ../../${tempdir}/lisp/term | |
128 ln README ../../${tempdir}/lisp/term) | |
129 | |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
130 echo "Making links to \`external-lisp'." |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
131 ### Don't distribute =*.el files. |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
132 (cd external-lisp |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
133 ln [a-zA-Z]*.el ../${tempdir}/external-lisp |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
134 ln [a-zA-Z]*.elc ../${tempdir}/external-lisp |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
135 ln ChangeLog README ../${tempdir}/external-lisp) |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
136 |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
137 echo "Making links to \`src'." |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
138 ### Don't distribute =*.[ch] files, or the configured versions of |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
139 ### config.h.in, paths.h.in, or Makefile.in. |
616 | 140 (cd src |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
141 echo " (If we can't link gmalloc.c, that's okay.)" |
616 | 142 ln [a-zA-Z]*.c ../${tempdir}/src |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
143 ## Might be a symlink to a file on another filesystem. |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
144 cp gmalloc.c ../${tempdir}/src |
616 | 145 ln [a-zA-Z]*.h ../${tempdir}/src |
146 ln [a-zA-Z]*.s ../${tempdir}/src | |
147 ln README Makefile.in ymakefile ChangeLog config.h.in paths.h.in \ | |
148 ../${tempdir}/src | |
149 ln .gdbinit .dbxinit ../${tempdir}/src | |
1626
53422adb945d
* make-dist: Don't bother to distribute src/*.com, or
Jim Blandy <jimb@redhat.com>
parents:
1578
diff
changeset
|
150 ln *.opt vms-pp.trans ../${tempdir}/src |
616 | 151 cd ../${tempdir}/src |
999 | 152 rm -f config.h paths.h Makefile |
153 if [ -z "${newer}" ]; then | |
154 etags *.h *.c ../lisp/*.el | |
155 fi) | |
616 | 156 |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
157 echo "Making links to \`src/m'." |
616 | 158 (cd src/m |
1574
352988418dbd
* make-dist: Don't forget that the way to avoid filenames starting
Jim Blandy <jimb@redhat.com>
parents:
1560
diff
changeset
|
159 ln README [a-zA-Z0-9]*.h ../../${tempdir}/src/m) |
616 | 160 |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
161 echo "Making links to \`src/s'." |
616 | 162 (cd src/s |
1574
352988418dbd
* make-dist: Don't forget that the way to avoid filenames starting
Jim Blandy <jimb@redhat.com>
parents:
1560
diff
changeset
|
163 ln README [a-zA-Z0-9]*.h ../../${tempdir}/src/s) |
616 | 164 |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
165 echo "Making links to \`lib-src'." |
616 | 166 (cd lib-src |
1424
892242701cba
* make-dist: Include lib-src/makedoc.com and emacs.csh in the
Jim Blandy <jimb@redhat.com>
parents:
1364
diff
changeset
|
167 ln [a-zA-Z]*.[chy] [a-zA-Z]*.lex [a-zA-Z]*.com ../${tempdir}/lib-src |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
168 ln ChangeLog Makefile.in README testfile vcdiff rcs2log ../${tempdir}/lib-src |
1424
892242701cba
* make-dist: Include lib-src/makedoc.com and emacs.csh in the
Jim Blandy <jimb@redhat.com>
parents:
1364
diff
changeset
|
169 ln emacs.csh ../${tempdir}/lib-src |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
170 cd ../${tempdir}/lib-src |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
171 rm -f getdate.c getdate.tab.c y.tab.c y.tab.h) |
616 | 172 |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
173 echo "Making links to \`oldXMenu'." |
616 | 174 (cd oldXMenu |
175 ln *.c *.h ../${tempdir}/oldXMenu | |
176 ln README Makefile Imakefile ChangeLog ../${tempdir}/oldXMenu) | |
177 | |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
178 echo "Making links to \`etc'." |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
179 ### Don't distribute DOC files, backups, autosaves, or tex litter. |
616 | 180 (cd etc |
181 ln [0-9a-zA-Z]* ../${tempdir}/etc | |
182 cd ../${tempdir}/etc | |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
183 ## Avoid an error when expanding the wildcards later. |
616 | 184 for dummy in DOC-dummy dummy~ \#dummy\# dummy.dvi dummy.log; do |
185 ln MACHINES ${dummy} | |
186 done | |
999 | 187 rm -f DOC* *~ \#*\# *.dvi *.log core) |
616 | 188 |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
189 ### For now, we comment these out, since I'm not changing them any. |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
190 ###!! echo "Making links to \`cpp'." |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
191 ###!! (cd cpp |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
192 ###!! ln cccp.c cexp.y Makefile README ../${tempdir}/cpp) |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
193 ###!! |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
194 ###!! echo "Making links to \`info'." |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
195 ###!! # Don't distribute backups or autosaves. |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
196 ###!! (cd info |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
197 ###!! ln [a-zA-Z]* ../${tempdir}/info |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
198 ###!! cd ../${tempdir}/info |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
199 ###!! # Avoid an error when expanding the wildcards later. |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
200 ###!! ln emacs dummy~ ; ln emacs \#dummy\# |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
201 ###!! rm -f *~ \#*\# core) |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
202 ###!! |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
203 ###!! echo "Making links to \`man'." |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
204 ###!! (cd man |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
205 ###!! ln *.tex *.texinfo *.texi *.aux *.cps *.fns *.kys *.vrs ../${tempdir}/man |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
206 ###!! ln *.c ../${tempdir}/man |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
207 ###!! ln ChangeLog Makefile README split-man ../${tempdir}/man) |
616 | 208 |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
209 echo "Making links to \`shortnames'." |
616 | 210 (cd shortnames |
211 ln *.c ../${tempdir}/shortnames | |
212 ln Makefile reserved special ../${tempdir}/shortnames) | |
213 | |
1364 | 214 echo "Making links to \`vms'." |
215 (cd vms | |
216 ln [0-9a-zA-Z]* ../${tempdir}/vms | |
217 cd ../${tempdir}/vms | |
218 rm -f *~) | |
219 | |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
220 echo "Making sure copying notices are all symlinks to \`etc/COPYING'." |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
221 rm -f ${tempdir}/etc/COPYING |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
222 cp etc/COPYING ${tempdir}/etc/COPYING |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
223 for subdir in lisp external-lisp src lib-src info shortnames; do |
616 | 224 if [ -f ${tempdir}/${subdir}/COPYING ]; then |
225 rm ${tempdir}/${subdir}/COPYING | |
226 fi | |
227 ln -s ../etc/COPYING ${tempdir}/${subdir} | |
228 done | |
229 | |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
230 if [ "${newer}" ]; then |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
231 echo "Removing files older than $newer." |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
232 ## We remove .elc files unconditionally, on the theory that anyone picking |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
233 ## up an incremental distribution already has a running Emacs to byte-compile |
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
234 ## them with. |
992
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
235 find ${tempparent} \( -name '*.elc' -o ! -newer ${newer} \) -exec rm -f {} \; |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
236 fi |
144a9a018e7c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
621
diff
changeset
|
237 |
621 | 238 if [ "${make_tar}" = yes ]; then |
239 echo "Creating tar file." | |
240 (cd ${tempparent}; tar cvf - ${emacsname}) | compress > ${emacsname}.tar.Z | |
241 fi | |
616 | 242 |
621 | 243 if [ "${clean_up}" = yes ]; then |
616 | 244 echo "Cleaning up the staging directory." |
245 rm -rf ${tempparent} | |
246 fi | |
994
5b2a1922c4d5
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
992
diff
changeset
|
247 |
1628
5ca8f0065e4e
* make-dist: Explain what's going on if config.sub and gmalloc.c
Jim Blandy <jimb@redhat.com>
parents:
1626
diff
changeset
|
248 ### make-dist ends here |