Mercurial > hg > xemacs-beta

diff lisp/w3/custom-check @ 46:6a22abad6937 r19-15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15
author cvs
date Mon, 13 Aug 2007 08:55:31 +0200
parents 8d2a9b52c682
children
line wrap: on
line diff
--- a/lisp/w3/custom-check	Mon Aug 13 08:55:13 2007 +0200
+++ b/lisp/w3/custom-check	Mon Aug 13 08:55:31 2007 +0200
@@ -4,8 +4,12 @@
     HOME=`(cd ; pwd)`
 fi
 
-WITH=`   ${EMACS} -batch -l ${HOME}/.emacs             -eval '(princ (file-truename (locate-library "custom")))'`
-WITHOUT=`${EMACS} -batch -q -no-site-file -l docomp.el -eval '(princ (file-truename (locate-library "custom")))'`
+if [ -f "${HOME}/.emacs" ]; then
+    DOTEMACS="-l ${HOME}/.emacs"
+fi
+
+WITH=`   ${EMACS} -batch ${DOTEMACS}      -eval '(princ (file-truename (locate-library "custom")))'`
+WITHOUT=`${EMACS} -batch -q -no-site-file -eval '(princ (file-truename (locate-library "custom")))'`
 
 if [ "${WITH}" = "${WITHOUT}" ]; then
     exit 0