Emacsを超便利にする「Helm」のパッケージインストール方法

(require 'package)
 
;; HTTP
(add-to-list 'package-archives '("melpa" . "http://melpa.org/packages/") t)
(add-to-list 'package-archives '("melpa-stable" . "http://stable.melpa.org/packages/") t)
(add-to-list 'package-archives '("org" . "http://orgmode.org/elpa/") t)
(add-to-list 'package-archives '("ELPA" . "http://tromey.com/elpa/") t)
 
(package-initialize)

;;
;; helm
;;

(require 'helm)
(require 'helm-config)

(global-set-key (kbd "C-c h") 'helm-command-prefix)
(global-unset-key (kbd "C-x c"))

(define-key helm-map (kbd "<tab>") 'helm-execute-persistent-action) ;; </tab>
(define-key helm-map (kbd "C-i") 'helm-execute-persistent-action)
(define-key helm-map (kbd "C-z")  'helm-select-action)

(when (executable-find "curl")
  (setq helm-google-suggest-use-curl-p t))

(setq helm-split-window-in-side-p           t
      helm-move-to-line-cycle-in-source     t
      helm-ff-search-library-in-sexp        t
      helm-scroll-amount                    8
      helm-ff-file-name-history-use-recentf t
      helm-echo-input-in-header-line t)

(defun spacemacs//helm-hide-minibuffer-maybe ()
  "Hide minibuffer in Helm session if we use the header line as input field."
  (when (with-helm-buffer helm-echo-input-in-header-line)
    (let ((ov (make-overlay (point-min) (point-max) nil nil t)))
      (overlay-put ov 'window (selected-window))
      (overlay-put ov 'face
                   (let ((bg-color (face-background 'default nil)))
                     `(:background ,bg-color :foreground ,bg-color)))
      (setq-local cursor-type nil))))


(add-hook 'helm-minibuffer-set-up-hook
          'spacemacs//helm-hide-minibuffer-maybe)

(setq helm-autoresize-max-height 0)
(setq helm-autoresize-min-height 20)
(helm-autoresize-mode 1)

(helm-mode 1)

;; helm: helm-M-x 有効
(global-set-key (kbd "M-x") 'helm-M-x)

;; helm: あいまい検索有効
(setq helm-M-x-fuzzy-match t)

;; helm: persistent action リバインド
(define-key helm-map (kbd "<tab>") 'helm-execute-persistent-action) ;; </tab>

;; helm: make TAB works in terminal リバインド
(define-key helm-map (kbd "C-i") 'helm-execute-persistent-action)

;; helm: list actions リバインド
(define-key helm-map (kbd "C-z")  'helm-select-action)

;; helm: バッファのサイズを候補の数に応じて自動的にリサイズ
(helm-autoresize-mode t)

;; helm: キルリングの表示
(global-set-key (kbd "M-y") 'helm-show-kill-ring)

;; helm: いろいろなソースを包括的に扱えるようにする
(global-set-key (kbd "C-x b") 'helm-mini)
(setq helm-buffers-fuzzy-matching t
      helm-recentf-fuzzy-match    t)

;; helm: ファイル あいまい検索
(global-set-key (kbd "C-x C-f") 'helm-find-files)

;; helm: Semantic と Imenuのあいまい検索
(setq helm-semantic-fuzzy-match t
      helm-imenu-fuzzy-match    t)

;; helm: マニュアルページに素早く飛ぶ。ミニバッファにpatternを入力可能、カーソルの指すシンボルをそのまま検索可能
(add-to-list 'helm-sources-using-default-as-input 'helm-source-man-pages)

;; helm: helm-locate あいまい検索
(setq helm-locate-fuzzy-match t)

;; helm: helm-occur のリバインド
(global-set-key (kbd "C-c h o") 'helm-occur)

;; helm: apropos あいまい検索
(setq helm-apropos-fuzzy-match t)

;; helm: Emacs Lisp の関数あいまい検索
(setq helm-lisp-fuzzy-completion t)

;; helm: helm-all-mark-rings リバインド
;; (global-set-key (kbd "C-h SPC") 'helm-all-mark-rings)

;; helm: Web 検索を有効
 (setq helm-surfraw-default-browser-function 'browse-url-generic
       browse-url-generic-program "google-chrome")

;; helm: Google 検索のサジェスト有効
(global-set-key (kbd "C-c h g") 'helm-google-suggest)

(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 )