(defun avy-menu-2 ()
  (interactive)
  (eval (avy-menu
         "*avy-menu-2*"
         '("メニュー"
           ("ファイル・ディレクトリを開く"
            ;; 値にS式を指定してevalで評価させる
            ("find init.el" . (find-file "~/.emacs.d/init.el"))
            ("open home directory" . (find-file "~/")))
           ("メッセージを表示する"
            ("message" . (message "ok"))))
         ;; 第3引数をtにすることでセクション名も表示する
         t)))