emacs helm の設定を整理

2016/03/24 現在のhelmの初期状態が、
変更していた自分好みと殆ど同じになったので
設定を見直した。

#+BEGIN_SRC lisp
;; ————————————————————————
;; @ helm
(require ‘helm-config)
(require ‘helm-command)
;;(require ‘helm-descbinds)

;; 体感速度向上
;;(setq helm-idle-delay 0.2)
;;(setq helm-input-idle-delay 0.2)

;;(setq helm-candidate-number-limit 200)
(setq helm-mini-default-sources ‘(helm-source-recentf
;;helm-source-files-in-current-dir
helm-source-buffers-list
;;helm-source-buffer-not-found
))
(helm-mode 1)

;; Helm KeyBind
(define-key global-map [remap find-file] ‘helm-find-files)
(define-key global-map [remap occur] ‘helm-occur)
(define-key global-map [remap list-buffers] ‘helm-buffers-list)
(define-key global-map [remap dabbrev-expand] ‘helm-dabbrev)
(global-set-key (kbd “M-x”) ‘helm-M-x)

;;; helmで変更したい/したくないコマンド
;;(add-to-list ‘helm-completing-read-handlers-alist ‘(find-file . nil))
;; ‘((describe-function . helm-completing-read-symbols)
;; (describe-variable . helm-completing-read-symbols)
;; (describe-symbol . helm-completing-read-symbols)
;; (debug-on-entry . helm-completing-read-symbols)
;; (find-function . helm-completing-read-symbols)
;; (disassemble . helm-completing-read-symbols)
;; (trace-function . helm-completing-read-symbols)
;; (trace-function-foreground . helm-completing-read-symbols)
;; (trace-function-background . helm-completing-read-symbols)
;; (find-tag . helm-completing-read-with-cands-in-buffer)
;; (ffap-alternate-file . nil)
;; (tmm-menubar . nil)
;; (find-file . nil)
;; (execute-extended-command . nil))

;; 自動補完を無効にする
;;(custom-set-variables ‘(helm-ff-auto-update-initial-value nil))

;; C-hでバックスペースと同じように文字を削除
;;(define-key helm-read-file-map (kbd “C-h”) ‘delete-backward-char)

;; TABで任意補完。選択肢が出てきたらC-nやC-pで上下移動してから決定することも可能
;;(define-key helm-read-file-map (kbd “TAB”) ‘helm-execute-persistent-action)

;; helm
;; minibuffer で C-k を押すと先頭から丸ごと削除され、kill ring に追加されないのを解決
;; → 今は不要
;;(setq helm-delete-minibuffer-contents-from-point t)
;;(defadvice helm-delete-minibuffer-contents (before helm-emulate-kill-line activate)
;; “Emulate `kill-line’ in helm minibuffer”
;; (kill-new (buffer-substring (point) (field-end))))

#+END_SRC

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です