(Fgoto_char): When arg is a marker, copy char and byte

[gnu-emacs] / make-dist

diff --git a/make-dist b/make-dist
index f65e4f499f781dee0357f2b441680dc2c3d59a2d..4abe8177d738655644c88383ecfa0078627cab83 100755 (executable)
--- a/make-dist
+++ b/make-dist
@@ -33,7 +33,7 @@ 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
@@ -144,8 +144,10 @@ them, and try again." >&2
 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
+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:"
@@ -154,8 +156,10 @@ 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
+((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
@@ -179,7 +183,7 @@ 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`
+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"
@@ -198,13 +202,17 @@ 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 leim; make leim-list.el EMACS=$EMACS)
+
+  echo "Recompiling Lisp files"
 
-  (cd lisp; make updates)
+  $EMACS -batch -f batch-byte-recompile-directory lisp leim
 fi
 
 echo "Making lisp/MANIFEST"
@@ -245,7 +253,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"
@@ -304,7 +312,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 +345,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