*scratch* バッファに

(delq nil
(mapcar
(lambda (i) (if (string-match "navi2ch" i) i))
load-path))

と書いて、カーソルを「load-path))」の後に置いて C-j する。普
通にnavi2chをインストールしてれば
("/usr/local/share/emacs/21.3.50/site-lisp/navi2ch")
などとなる。

上のelispのもっとスマートな書き方があれば教えてください
＞識者の方々