>>272
とりあえず実行してみたけど、ちゃんと抽出してるみたいだよ？
copy-region-as-kill-nomark って関数がなかったから copy-region-as-kill にしたのと、
error になるから search-forward の第三引数 t にしたけど。
; search-forward の第三引数の意味って、処理系依存だったりするのかな…

ところで get-list が空っぽって、どうやって確認したの？