conf-helm.el 1.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142
  1. ;;; package --- Conf Helm Mode
  2. ;;;
  3. ;;; Commentary:
  4. ;;; All configuration for helm mode
  5. ;;;
  6. ;;; Code:
  7. (require 'helm)
  8. (require 'helm-config)
  9. (helm-mode )
  10. (setq helm-boring-buffer-regexp-list '("\\` " "\\*helm" "\\*helm-mode" "\\*Echo Area" "\\*Minibuf" "\\*monky-cmd-process\\*" "\\*epc con" "\\*Compile-Log\\*" "\\*monky-process\\*" "\\*CEDET CScope\\*" "\\*Messages\\*" "\\*Flycheck error" "\\*Elpy" "\\*elpy-rpc" "\\*magit"))
  11. (setq helm-boring-file-regexp-list '("\\.git$" "\\.hg$" "\\.svn$" "\\.CVS$" "\\._darcs$" "\\.la$" "\\.o$" "~$" "\\.pyc$"
  12. "\\.elc$" "TAGS" "\#*\#" "\\.exe$" "\\.zip$" "\\.tar." "\\.rar$" "\\.7z$" "\\.jar$"
  13. "\\.img$" "\\.iso$" "\\.xlsx$" "\\.epub$" "\\.docx$"))
  14. (setq helm-ff-skip-boring-files t)
  15. (setq helm-move-to-line-cycle-in-source t)
  16. (setq helm-truncate-lines t)
  17. (setq helm-input-idle-delay 0)
  18. (defun emacs-d-find-file ()
  19. (interactive)
  20. (helm-projectile-find-file-in-dir "~/.emacs.d"))
  21. (defun helm-projectile-find-file-in-dir (dir-name)
  22. (let ((default-directory dir-name))
  23. (helm-projectile)))
  24. (defun make-quickdir (modifier dir-name)
  25. (lexical-let ((d dir-name))
  26. (let ((hook (lambda () (interactive) (helm-projectile-find-file-in-dir d))))
  27. (global-set-key modifier hook))))
  28. (provide 'conf-helm)
  29. ;;; conf-helm.el ends here