# HG changeset patch # User Stefan Monnier # Date 939583188 0 # Node ID 999bac80682ffc0e36d9e85bc20149b09eff82f9 # Parent aba4d088f0d8f9f2a1da85b0b7ec06afef5472d2 (compile, bootstrap-compile): don't use setwins: I'm an idiot. diff -r aba4d088f0d8 -r 999bac80682f lisp/Makefile --- a/lisp/Makefile Sun Oct 10 19:18:47 1999 +0000 +++ b/lisp/Makefile Sun Oct 10 19:19:48 1999 +0000 @@ -112,8 +112,14 @@ compile: doit wd=`pwd`; \ find $$wd -name "*.elc" -print | xargs chmod +w; \ - $(setwins); \ - loadpath="(setq load-path '($$wins))"; \ + subdirs=`find $$wd -type d -print`; \ + for dir in $$subdirs; do \ + case $$dir in \ + */Old | */RCS | */CVS | */=* ) ;; \ + *) loadpath="$$loadpath \"$$dir\"" ;; \ + esac; \ + done; \ + loadpath="(setq load-path '($$loadpath))"; \ dont_compile=`echo $(DONTCOMPILE)`; \ for el in $(EL); do \ compile_it=y; \ @@ -123,6 +129,7 @@ fi; \ done; \ if test $$compile_it = y; then \ + echo $(emacs) --eval "$$loadpath" -f batch-byte-compile $$el; \ $(emacs) --eval "$$loadpath" -f batch-byte-compile $$el; \ else \ echo "Don't compile $$el"; \ @@ -136,8 +143,14 @@ bootstrap-compile: doit wd=`pwd`; \ find $$wd -name "*.elc" -print | xargs rm -f \ - $(setwins); \ - loadpath="(setq load-path '($$wins))"; \ + subdirs=`find $$wd -type d -print`; \ + for dir in $$subdirs; do \ + case $$dir in \ + */Old | */RCS | */CVS | */=* ) ;; \ + *) loadpath="$$loadpath \"$$dir\"" ;; \ + esac; \ + done; \ + loadpath="(setq load-path '($$loadpath))"; \ dont_compile=`echo $(DONTCOMPILE)`; \ for el in $(EL); do \ compile_it=y; \