Mercurial > hg > xemacs-beta

comparison lisp/w3/custom-check @ 44:8d2a9b52c682 r19-15prefinal

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15prefinal
author cvs
date Mon, 13 Aug 2007 08:55:10 +0200
parents c53a95d3c46d
children 6a22abad6937
comparison
equal deleted inserted replaced
43:23cafc5d2038 44:8d2a9b52c682
2 EMACS=${1:-emacs} 2 EMACS=${1:-emacs}
3 if [ -z "$HOME" ]; then 3 if [ -z "$HOME" ]; then
4 HOME=`(cd ; pwd)` 4 HOME=`(cd ; pwd)`
5 fi 5 fi
6 6
7 if [ -n "$WIDGETDIR" ]; then 7 WITH=` ${EMACS} -batch -l ${HOME}/.emacs -eval '(princ (file-truename (locate-library "custom")))'`
8 echo "WIDGETDIR environment variable set, good good" 8 WITHOUT=`${EMACS} -batch -q -no-site-file -l docomp.el -eval '(princ (file-truename (locate-library "custom")))'`
9 exit 0
10 fi
11
12 WITH=`${EMACS} -batch -l ${HOME}/.emacs -eval '(princ (locate-library "custom"))' | cut -f3- |xargs dirname`
13 WITHOUT=`${EMACS} -batch -eval '(princ (locate-library "custom"))' | cut -f3- |xargs dirname`
14 9
15 if [ "${WITH}" = "${WITHOUT}" ]; then 10 if [ "${WITH}" = "${WITHOUT}" ]; then
16 exit 0 11 exit 0
17 else 12 else
18 echo "WARNING -- WARNING -- WARNING" 13 echo "WARNING -- WARNING -- WARNING"