equal
deleted
inserted
replaced
36 PERL=$(findbin /usr/bin/perl) |
36 PERL=$(findbin /usr/bin/perl) |
37 |
37 |
38 for FILE in $(find . -type f -print) |
38 for FILE in $(find . -type f -print) |
39 do |
39 do |
40 if [ -x "$FILE" ]; then |
40 if [ -x "$FILE" ]; then |
41 sed -e "s:^#!.*/bash:#!$BASH:" -e "s:^#!.*/perl:#!$PERL:" $FILE >$FILE~~ |
41 sed -e "s:^#!.*/bash:#!$BASH:" -e "s:^#!.*/perl:#!$PERL:" \ |
|
42 -e "s:^AUTO_BASH=.*/bash:AUTO_BASH=$BASH:" \ |
|
43 -e "s:^AUTO_PERL=.*/bash:AUTO_PERL=$PERL:" $FILE >$FILE~~ |
42 if cmp -s $FILE $FILE~~; then |
44 if cmp -s $FILE $FILE~~; then |
43 rm $FILE~~ |
45 rm $FILE~~ |
44 else |
46 else |
45 rm -f $FILE |
47 rm -f $FILE |
46 mv $FILE~~ $FILE |
48 mv $FILE~~ $FILE |