mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-23 10:34:07 +00:00
(setwins, setwins_almost): Change directory to $wd
before finding directories by `find'.
This commit is contained in:
parent
adb3b3532f
commit
39cc05f572
@ -1,3 +1,8 @@
|
||||
2004-03-29 Kenichi Handa <handa@m17n.org>
|
||||
|
||||
* Makefile.in (setwins, setwins_almost): Change directory to $wd
|
||||
before finding directories by `find'.
|
||||
|
||||
2004-03-28 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* subr.el (interactive-form): Delete. Now implemented in C.
|
||||
@ -320,7 +325,7 @@
|
||||
Eliminate revert messages.
|
||||
(dired-mode): Set buffer-stale-function to dired-buffer-stale-p.
|
||||
|
||||
2004-03-23 Kenichi Handa <handa@etlken2>
|
||||
2004-03-23 Kenichi Handa <handa@m17n.org>
|
||||
|
||||
* international/characters.el: Setup syntaxes for more parentheses
|
||||
Unicode characters.
|
||||
|
@ -136,17 +136,17 @@ emacs = EMACSLOADPATH=$(lisp) $(EMACS) $(EMACSOPT)
|
||||
|
||||
# Common command to find subdirectories
|
||||
|
||||
setwins=subdirs=`find $$wd -type d -print`; \
|
||||
setwins=subdirs=`(cd $$wd; find . -type d -print)`; \
|
||||
for file in $$subdirs; do \
|
||||
case $$file in */Old | */RCS | */CVS | */CVS/* | */.* | */.*/* | */=* ) ;; \
|
||||
*) wins="$$wins $$file" ;; \
|
||||
*) wins="$$wins $$wd/$$file" ;; \
|
||||
esac; \
|
||||
done
|
||||
|
||||
setwins_almost=subdirs=`find $$wd -type d -print`; \
|
||||
setwins_almost=subdirs=`(cd $$wd; find . -type d -print)`; \
|
||||
for file in $$subdirs; do \
|
||||
case $$file in */Old | */RCS | */CVS | */CVS/* | */.* | */.*/* | */=* | */obsolete | */term ) ;; \
|
||||
*) wins="$$wins $$file" ;; \
|
||||
*) wins="$$wins $$wd/$$file" ;; \
|
||||
esac; \
|
||||
done
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user