skk-comp + auto-complete のようなもの

skk の補完機能，補完候補一覧が出てほしいなと思っていて，探したけどみつからなかったのでなんとなくそれっぽく書いてみた。

(defun mylib-ac-source-skk-comp-candidates ()
  (when skk-henkan-mode
    (skk-comp-get-all-candidates (buffer-substring-no-properties
                                  skk-henkan-start-point (point))
                                 nil skk-completion-prog-list)))
(add-to-list 'ac-trigger-commands 'skk-insert)
(defvar ac-source-skk-comp
  '((candidates . mylib-ac-source-skk-comp-candidates)
    (prefix . "▽\\(.+\\)")))
(setq-default ac-sources (cons 'ac-source-skk-comp ac-sources))