awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

Convenience helm defuns

Browse Source
This commit is contained in:
Henrik Lissner
2015-12-09 17:10:12 -05:00
parent 5980ebf28f
commit e9916d2037
1 changed files with 21 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
core/lib/defuns-helm.el
View File

@ -68,5 +68,26 @@
(interactive "<a><!>") (interactive "<a><!>")
(if bang (helm-multi-swoop-all search) (helm-swoop :$query search))) (if bang (helm-multi-swoop-all search) (helm-swoop :$query search)))
;;;###autoload
(defun narf/helm-projectile-in-emacsd ()
(interactive)
(in! narf-emacs-dir (helm-projectile-find-file)))
;;;###autoload
(defun narf/helm-buffers-dwim (&optional all-p)
"Displays open buffers in current project. If ALL-P, then show all open
buffers."
(if (and (not all-p) (narf/project-p))
(helm-projectile-switch-to-buffer)
(helm-buffers-list)))
;;;###autoload
(defun narf/helm-org-find-files ()
(interactive)
(in! org-directory
(let ((helm-ff-skip-boring-files t))
(helm-find-files-1 org-directory))))
(provide 'defuns-helm) (provide 'defuns-helm)
;;; defuns-helm.el ends here ;;; defuns-helm.el ends here