mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-25 07:28:20 +00:00
(setwins): abstract out the command to find subdirectories
and fix it to also ignore subdirectories of CVS (f.ex. CVS/Base). (custom-deps, finder-data, autoloads, update-subdirs, updates): use it.
This commit is contained in:
parent
c652cdb8c2
commit
80c382e5c2
@ -50,57 +50,40 @@ emacs = $(EMACS) $(EMACSOPT)
|
||||
|
||||
temacs=../src/temacs -batch -l ./loadup.el
|
||||
|
||||
# Common command to find subdirectories
|
||||
|
||||
setwins=subdirs=`find . -type d -print`; \
|
||||
for file in $$subdirs; do \
|
||||
case $$file in */Old | */RCS | */CVS | */CVS/* | */=* ) ;; \
|
||||
*) wins="$$wins $$file" ;; \
|
||||
esac; \
|
||||
done
|
||||
|
||||
doit:
|
||||
|
||||
custom-deps: doit
|
||||
subdirs=`find . -type d -print`; \
|
||||
for file in $$subdirs; do \
|
||||
case $$file in */Old | */RCS | */CVS | */=* ) ;; \
|
||||
*) wins="$$wins $$file" ;; \
|
||||
esac; \
|
||||
done; \
|
||||
$(setwins); \
|
||||
echo Directories: $$wins; \
|
||||
$(emacs) -l cus-dep -f custom-make-dependencies $$wins
|
||||
|
||||
finder-data: doit
|
||||
subdirs=`find . -type d -print`; \
|
||||
for file in $$subdirs; do \
|
||||
case $$file in */Old | */RCS | */CVS | */=* ) ;; \
|
||||
*) wins="$$wins $$file" ;; \
|
||||
esac; \
|
||||
done; \
|
||||
$(setwins); \
|
||||
echo Directories: $$wins; \
|
||||
$(emacs) -l finder -f finder-compile-keywords-make-dist $$wins
|
||||
|
||||
autoloads: doit
|
||||
subdirs=`find . -type d -print`; \
|
||||
for file in $$subdirs; do \
|
||||
case $$file in */Old | */RCS | */CVS | */=* ) ;; \
|
||||
*) wins="$$wins $$file" ;; \
|
||||
esac; \
|
||||
done; \
|
||||
$(setwins); \
|
||||
echo Directories: $$wins; \
|
||||
$(emacs) -f batch-update-autoloads $$wins
|
||||
|
||||
update-subdirs: doit
|
||||
subdirs=`find . -type d -print`; \
|
||||
for file in $$subdirs; do \
|
||||
case $$file in */Old | */RCS | */CVS | */=* ) ;; \
|
||||
*) wins="$$wins $$file" ;; \
|
||||
esac; \
|
||||
done; \
|
||||
$(setwins); \
|
||||
for file in $$wins; do \
|
||||
../update-subdirs $$file; \
|
||||
done;
|
||||
|
||||
updates: doit
|
||||
subdirs=`find . -type d -print`; \
|
||||
for file in $$subdirs; do \
|
||||
case $$file in */Old | */RCS | */CVS | */=* ) ;; \
|
||||
*) wins="$$wins $$file" ;; \
|
||||
esac; \
|
||||
done; \
|
||||
$(setwins); \
|
||||
for file in $$wins; do \
|
||||
../update-subdirs $$file; \
|
||||
done; \
|
||||
|
Loading…
Reference in New Issue
Block a user