(ido-mode 1)
;;; あいまいマッチ:これを入れないとidoの魅力がガタ落ち
(setq ido-enable-flex-matching t)
;;; 縦に並べる(お好みで)
(when (fboundp 'ido-vertical-mode)
  (ido-vertical-mode 1))
;;; completing-readをido化
(ido-ubiquitous-mode 1)
;;; M-xをido化
(when (fboundp 'smex)
  (global-set-key (kbd "M-x") 'smex))
;;; skk使いはC-jをskk-modeにする
(when (fboundp 'skk-mode)
  (fset 'ido-select-text 'skk-mode))
;;; 使用例
(defun test ()
  (interactive)
  (message
   (completing-read "Test: " '("foo" "bar" "baz") nil t)))
(defun test2 ()
  (interactive)
  (message
   (completing-read "Test: " '("foo" "bar" "baz") )))