(setwins, setwins_almost): Change directory to $wd

before finding directories by `find'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2857c041abaa0c8a7ad9bcdda262a195d6380b86..b4f846d5ee114e45b659a8da29b2fb08bc5cfe20 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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.

diff --git a/lisp/Makefile.in b/lisp/Makefile.in
index e1c6b779db2c80ed34152eb8bcd24beea4cb4120..9efd587a199d45e997aef36d9202fa62b5dc040f 100644 (file)
--- a/lisp/Makefile.in
+++ b/lisp/Makefile.in
@@ -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