trunk/bin/rename-method.sh

#!/bin/sh

from='params_form';
to='as_markup'

echo "rename method $from -> $to"

grep -lr $from lib t etc | xargs --verbose -i sh -c "perl -p -i -n -e 's{(sub |->|/)$from}{\1$to}g' {}" && (
        svk diff | vi -R -
)
1	#!/bin/sh
2
3	from='params_form';
4	to='as_markup'
5
6	echo "rename method $from -> $to"
7
8	grep -lr $from lib t etc \| xargs --verbose -i sh -c "perl -p -i -n -e 's{(sub \|->\|/)$from}{\1$to}g' {}" && (
9	svk diff \| vi -R -
10	)