diff options
| author | Paul Eggert | 2017-01-01 01:02:45 -0800 |
|---|---|---|
| committer | Paul Eggert | 2017-01-01 01:02:45 -0800 |
| commit | 4f7a90bf6ce831063d721324e712f8c38e85c678 (patch) | |
| tree | 73e980746ddc55c4285d145769a94b2845cbfcdf /make-dist | |
| parent | 620e5a3cd4464aaffaa3568d6f6b89764de5cfbd (diff) | |
| parent | 9adb101353e1f3d41a8f822fa4164e9b41e82ce5 (diff) | |
| download | emacs-4f7a90bf6ce831063d721324e712f8c38e85c678.tar.gz emacs-4f7a90bf6ce831063d721324e712f8c38e85c678.zip | |
Merge from origin/emacs-25
9adb101 Document 'describe-fontset'
229315c ; Add missing symbol quoting.
3d94931 Repair desktop restoration on text terminals
43022f9 Ignore forward-sexp-function in js-mode indentation code
b19fb49 Improve documentation of 'define-coding-system'
467768f Fix Bug#25162
6db78ae Fix a typo in define-abbrev-table
5f7d906 Bump makeinfo requirement from 4.7 to 4.13
442e2f6 Fixes related to select-enable-clipboard
e4ac450 Define struct predicate before acccesors
08decbd Doc fix for vc-git
5531e75 Further improve make-dist checking
953bf67 Improve previous make-dist change
129645a Make make-dist --snapshot do some sanity checks
# Conflicts:
# lisp/menu-bar.el
Diffstat (limited to 'make-dist')
| -rwxr-xr-x | make-dist | 56 |
1 files changed, 55 insertions, 1 deletions
| @@ -101,7 +101,6 @@ while [ $# -gt 0 ]; do | |||
| 101 | clean_up=yes | 101 | clean_up=yes |
| 102 | make_tar=yes | 102 | make_tar=yes |
| 103 | update=no | 103 | update=no |
| 104 | check=no | ||
| 105 | ;; | 104 | ;; |
| 106 | 105 | ||
| 107 | ## Include the test/ directory. | 106 | ## Include the test/ directory. |
| @@ -211,6 +210,11 @@ them, and try again." >&2 | |||
| 211 | fi | 210 | fi |
| 212 | 211 | ||
| 213 | if [ $check = yes ]; then | 212 | if [ $check = yes ]; then |
| 213 | |||
| 214 | echo "Sanity checking (use --no-check to disable this)..." | ||
| 215 | |||
| 216 | error=no | ||
| 217 | |||
| 214 | ls -1 lisp/[a-zA-Z]*.el lisp/[a-z]*/[a-zA-Z0-9]*.el \ | 218 | ls -1 lisp/[a-zA-Z]*.el lisp/[a-z]*/[a-zA-Z0-9]*.el \ |
| 215 | lisp/[a-z]*/[a-z]*/[a-zA-Z0-9]*.el \ | 219 | lisp/[a-z]*/[a-z]*/[a-zA-Z0-9]*.el \ |
| 216 | lisp/[a-z]*/[a-z]*/[a-z]*/[a-zA-Z0-9]*.el > /tmp/el | 220 | lisp/[a-z]*/[a-z]*/[a-z]*/[a-zA-Z0-9]*.el > /tmp/el |
| @@ -224,6 +228,7 @@ if [ $check = yes ]; then | |||
| 224 | 228 | ||
| 225 | bogosities=`comm -13 /tmp/elelc /tmp/elc` | 229 | bogosities=`comm -13 /tmp/elelc /tmp/elc` |
| 226 | if [ x"${bogosities}" != x"" ]; then | 230 | if [ x"${bogosities}" != x"" ]; then |
| 231 | error=yes | ||
| 227 | echo "The following .elc files have no corresponding .el files:" | 232 | echo "The following .elc files have no corresponding .el files:" |
| 228 | echo "${bogosities}" | 233 | echo "${bogosities}" |
| 229 | fi | 234 | fi |
| @@ -232,6 +237,19 @@ if [ $check = yes ]; then | |||
| 232 | sed 's/\.elc$/.el/' /tmp/elc > /tmp/elcel | 237 | sed 's/\.elc$/.el/' /tmp/elc > /tmp/elcel |
| 233 | losers=`comm -23 /tmp/el /tmp/elcel` | 238 | losers=`comm -23 /tmp/el /tmp/elcel` |
| 234 | 239 | ||
| 240 | bogosities= | ||
| 241 | while read elc; do | ||
| 242 | el=`echo $elc | sed 's/c$//'` | ||
| 243 | [ -e $el ] || continue | ||
| 244 | [ $elc -nt $el ] || bogosities="$bogosities $elc" | ||
| 245 | done < /tmp/elc | ||
| 246 | |||
| 247 | if [ x"${bogosities}" != x"" ]; then | ||
| 248 | error=yes | ||
| 249 | echo "The following .elc files are older than their .el files:" | ||
| 250 | echo "${bogosities}" | ||
| 251 | fi | ||
| 252 | |||
| 235 | rm -f /tmp/el /tmp/elc /tmp/elcel /tmp/elelc | 253 | rm -f /tmp/el /tmp/elc /tmp/elcel /tmp/elelc |
| 236 | 254 | ||
| 237 | bogosities= | 255 | bogosities= |
| @@ -245,9 +263,45 @@ if [ $check = yes ]; then | |||
| 245 | 263 | ||
| 246 | done | 264 | done |
| 247 | if [ x"${bogosities}" != x"" ]; then | 265 | if [ x"${bogosities}" != x"" ]; then |
| 266 | error=yes | ||
| 248 | echo "The following .el files have no corresponding .elc files:" | 267 | echo "The following .el files have no corresponding .elc files:" |
| 249 | echo "${bogosities}" | 268 | echo "${bogosities}" |
| 250 | fi | 269 | fi |
| 270 | |||
| 271 | |||
| 272 | ## This is only a crude check, eg it does not handle .info | ||
| 273 | ## files with multiple .texi source files. | ||
| 274 | find doc -name '*.texi' > /tmp/el | ||
| 275 | |||
| 276 | bogosities= | ||
| 277 | while read texi; do | ||
| 278 | info=`sed -n 's/^@setfilename //p' $texi | sed 's|.*info/||'` | ||
| 279 | [ x"${info}" != x"" ] || continue | ||
| 280 | info=info/$info | ||
| 281 | [ -e $info ] || continue | ||
| 282 | [ $info -nt $texi ] || bogosities="$bogosities $info" | ||
| 283 | done < /tmp/el | ||
| 284 | |||
| 285 | rm -f /tmp/el | ||
| 286 | |||
| 287 | if [ x"${bogosities}" != x"" ]; then | ||
| 288 | error=yes | ||
| 289 | echo "The following .info files are older than their .texi files:" | ||
| 290 | echo "${bogosities}" | ||
| 291 | fi | ||
| 292 | |||
| 293 | ## This exits with non-zero status if any .info files need | ||
| 294 | ## rebuilding. | ||
| 295 | if [ -e Makefile ]; then | ||
| 296 | echo "Checking to see if info files are up-to-date..." | ||
| 297 | make --question info || error=yes | ||
| 298 | fi | ||
| 299 | |||
| 300 | if [ $error = yes ]; then | ||
| 301 | echo "Failed checks" >&2 | ||
| 302 | exit 1 | ||
| 303 | fi | ||
| 304 | |||
| 251 | fi | 305 | fi |
| 252 | 306 | ||
| 253 | if [ $update = yes ]; then | 307 | if [ $update = yes ]; then |