Mercurial > emacs
comparison update-subdirs @ 25931:3ede6c50d7f5
also ignore CVS subdirs.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Fri, 08 Oct 1999 21:27:40 +0000 |
| parents | 354e0c45cedf |
| children | f440b9766968 |
comparison
equal
deleted
inserted
replaced
| 25930:4c1654cc8388 | 25931:3ede6c50d7f5 |
|---|---|
| 1 #!/bin/sh | 1 #!/bin/sh |
| 2 # Write into $1/subdirs.el a list of subdirs of directory $1. | 2 # Write into $1/subdirs.el a list of subdirs of directory $1. |
| 3 cd $1 | 3 cd $1 |
| 4 for file in *; do | 4 for file in *; do |
| 5 case $file in | 5 case $file in |
| 6 *.elc | *.el | term | RCS | Old | . | .. | =* | *~ | *.orig | *.rej) | 6 *.elc | *.el | term | RCS | CVS | Old | . | .. | =* | *~ | *.orig | *.rej) |
| 7 ;; | 7 ;; |
| 8 *) | 8 *) |
| 9 if [ -d $file ]; then | 9 if [ -d $file ]; then |
| 10 subdirs="\"$file\" $subdirs" | 10 subdirs="\"$file\" $subdirs" |
| 11 fi | 11 fi |