Mercurial > hg > xemacs-beta

comparison lib-src/update-custom.sh @ 392:1f50e6fe4f3f r21-2-11

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-11
author cvs
date Mon, 13 Aug 2007 11:10:50 +0200
parents cc15677e0335
children
comparison
equal deleted inserted replaced
391:e50d8e68d7a5 392:1f50e6fe4f3f
43 test -z "$EMACS" && EMACS="./src/xemacs" 43 test -z "$EMACS" && EMACS="./src/xemacs"
44 echo " (using $EMACS)" 44 echo " (using $EMACS)"
45 45
46 export EMACS 46 export EMACS
47 47
48 REAL=`cd \`dirname $EMACS\` ; pwd | sed 's|^/tmp_mnt||'`/`basename $EMACS` 48 EMACS_DIR=`cd \`dirname $EMACS\` && pwd`;
49 # Account for various system automounter configurations
50 if test -d "/net"; then
51 if test -d "/tmp_mnt/net"; then tdir="/tmp_mnt/net"; else tdir="/tmp_mnt"; fi
52 EMACS_DIR=`echo "$EMACS_DIR" | \
53 sed -e "s|^${tdir}/|/net/|" -e "s|^/a/|/net/|" -e "s|^/amd/|/net/|"`
54 fi
55 REAL="$EMACS_DIR/`basename $EMACS`"
49 56
50 echo "Rebuilding custom-loads with $REAL..." 57 echo "Rebuilding custom-loads with $REAL..."
51 58
52 if [ "`uname -r | sed 's/\(.\).*/\1/'`" -gt 4 ]; then 59 if [ "`uname -r | sed 's/\(.\).*/\1/'`" -gt 4 ]; then
53 echon() 60 echon()
54 { 61 {
55 /bin/echo $* '\c' 62 /bin/echo $* '\c'
56 } 63 }
57 else 64 else
58 echon() 65 echon()
59 { 66 {
60 echo -n $* 67 echo -n $*
61 } 68 }
62 fi 69 fi
63 70
64 # Compute patterns to ignore when searching for files 71 # Compute patterns to ignore when searching for files
65 # These directories don't have customizations, or are partially broken. 72 ignore_dirs=""
66 # If some of the packages listed here are customized, don't forget to
67 # remove the directory!
68 ignore_dirs="cl egg eos its language locale sunpro term \
69 tooltalk iso electric \
70 hm--html-menus gnats pcl-cvs vm"
71 73
72 # Only use Mule XEmacs to build Mule-specific autoloads & custom-loads. 74 # Only use Mule XEmacs to build Mule-specific autoloads & custom-loads.
73 echon "Checking for Mule support..." 75 echon "Checking for Mule support..."
74 lisp_prog='(princ (featurep (quote mule)))' 76 lisp_prog='(princ (featurep (quote mule)))'
75 mule_p="`$EMACS -batch -q -no-site-file -eval \"$lisp_prog\"`" 77 mule_p="`$EMACS -batch -q -no-site-file -eval \"$lisp_prog\"`"
76 if test "$mule_p" = nil ; then 78 if test "$mule_p" = nil ; then
77 echo No 79 echo No
78 ignore_dirs="$ignore_dirs mule leim skk" 80 ignore_dirs="$ignore_dirs mule"
79 else 81 else
80 echo Yes 82 echo Yes
81 fi 83 fi
82 84
83 echon "Checking directories..." 85 echon "Checking directories..."