-### Check for .elc files with no corresponding .el file.
-ls -1 {lisp,leim}/[a-z]*.el {lisp,leim}/[a-z]*/[a-z]*.el | sed 's/\.el$/.elc/' > /tmp/el
-ls -1 {lisp,leim}/[a-z]*.elc {lisp,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-zA-Z]*.el lisp/[a-z]*/[a-zA-Z0-9]*.el \
+ leim/[a-z]*/[a-z]*.el | sed 's/\.el$/.elc/' > /tmp/el
+ ls -1 lisp/[a-zA-Z]*.elc lisp/[a-z]*/[a-zA-Z0-9]*.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.
+ ls -1 lisp/[a-zA-Z]*.el lisp/[a-z]*/[a-zA-Z0-9]*.el \
+ leim/[a-z]*/[a-z]*.el > /tmp/el
+ ls -1 lisp/[a-zA-Z]*.elc lisp/[a-z]*/[a-zA-Z0-9]*.elc \
+ leim/[a-z]*/[a-z]*.elc | sed 's/\.elc$/.el/' > /tmp/elc
+ losers="`comm -23 /tmp/el /tmp/elc`"
+ bogosities=
+ for file in $losers; do
+ if ! grep -q "no-byte-compile: t" $file; then
+ case $file in
+ site-init.el | site-load.el | site-start.el | default.el)
+ ;;
+ *)
+ 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"