編集中のファイルを一気にバッファに開く

$ for i in $(svn st | grep ^[MA] | perl -alne 'print $F[1]'); do open -a /Applications/Emacs.app/ $i; done

elispとか使いこなせればこんなことしなくてもいいのかな…?