古い.emacs.elからの移植 (3)