|
0
|
1 #!/bin/sh
|
|
|
2 ### update-autoloads.sh --- update loaddefs.el as necessary
|
|
|
3
|
|
|
4 # Author: Jamie Zawinski <jwz@lucid.com>
|
|
|
5 # Maintainer: Ben Wing <ben.wing@Eng.Sun.COM>
|
|
|
6 # Created: ?
|
|
|
7 # Version: 1.0
|
|
|
8 # Modified: 94/07/13 16:18:44
|
|
|
9 # Keywords: recompile .el .elc
|
|
|
10
|
|
|
11 ### Commentary:
|
|
|
12 ## Recompile all .elc files that need recompilation. Requires a working
|
|
|
13 ## version of 'xemacs'. Correctly handles the case where the .elc files
|
|
|
14 ## are missing; thus you can execute 'rm lisp/*/*.elc' before running
|
|
|
15 ## this script. Run this from the parent directory of 'src', 'lisp',
|
|
|
16 ## and 'etc'. (If this is a Sun workspace, you can run it from
|
|
|
17 ## 'era-specific' instead.)
|
|
|
18
|
|
|
19 set -eu
|
|
|
20
|
|
|
21 # This means we're running in a Sun workspace
|
|
|
22 if [ -d ../era-specific ]; then
|
|
|
23 cd ../editor
|
|
|
24 fi
|
|
|
25
|
|
|
26 # get to the right directory
|
|
|
27 if [ ! -d ./lisp ]; then
|
|
|
28 if [ -d ../lisp ]; then
|
|
|
29 cd ..
|
|
|
30 else
|
|
|
31 echo $0: neither ./lisp/ nor ../lisp/ exist
|
|
|
32 exit 1
|
|
|
33 fi
|
|
|
34 fi
|
|
|
35
|
|
|
36 EMACS=./src/xemacs
|
|
|
37 echo " (using $EMACS)"
|
|
|
38
|
|
|
39 export EMACS
|
|
|
40
|
|
|
41 # fuckin' sysv, man...
|
|
|
42 if [ "`uname -r | sed 's/\(.\).*/\1/'`" -gt 4 ]; then
|
|
|
43 echon()
|
|
|
44 {
|
|
|
45 /bin/echo $* '\c'
|
|
|
46 }
|
|
|
47 else
|
|
|
48 echon()
|
|
|
49 {
|
|
|
50 echo -n $*
|
|
|
51 }
|
|
|
52 fi
|
|
|
53
|
|
|
54 REAL=`cd \`dirname $EMACS\` ; pwd | sed 's|^/tmp_mnt||'`/`basename $EMACS`
|
|
|
55
|
|
|
56 echo "Recompiling in `pwd|sed 's|^/tmp_mnt||'`"
|
|
|
57 echo " with $REAL..."
|
|
|
58
|
|
|
59 src/xemacs -batch -q -f batch-update-autoloads \
|
|
|
60 `ls lisp | egrep -v \
|
|
|
61 "COPYING|README|SCCS|egg|eterm|its|mule|paths.el|quail|version.el|vms" \
|
|
|
62 | xargs -i echo lisp/\{\}`
|
