anything.elのsourceをanythingしてみた
anythingのソースを作ってみようと思って最初に浮かんだのがこれでした。
定義済みのanything用のソース一覧からanythingして、選択したソースでanythingするだけ。文章にするとわかりづらい(汗
anything-sourcesになにを設定しようか迷っているときつかえるような気がします。
ものすごく車輪の再発明なような気もしているのですが、折角なので公開してみる。
(defvar anything-c-source-anything-sources '((name . "anything sources") (candidates . (lambda () (sort (all-completions "anything-c-source-" obarray 'boundp) 'string-lessp))) (action . (("anything" . (lambda (candidate) (anything (intern candidate))))))) "Source for anything sources.") ;; (anything 'anything-c-source-anything-sources)
思ったより簡単だったので、いろいろ作ってみたいものです。
作り方はanything.el自体に書いてありますので、自作したことがない人はレッツチャレンジしてみてください。