探してみても見あたら無かったので慣れないelispで書いてみたでござるの巻 (eval-when-compile (require 'cl)) (require 'flymake) (setq anything-c-source-flymake '((name . "Flymake") (init . (lambda () (setq anything-flymake-err-list (loop for err-info in flymake-err-info for err = (nth 1 err-info) append err)))) (candidates . (lambda () (mapcar (lambda (err) (let* ((text (flymake-ler-text err)) (line (flymake-ler-line err))) (cons (fo