EXWM: Fix loading of helm-emms

master
Pierre Neidhardt 2017-11-02 22:00:38 +01:00
parent 37f76d3065
commit fcffbeadb3
2 changed files with 5 additions and 4 deletions

View File

@ -74,8 +74,6 @@
"s-\\" 'helm-toggle-resplit-and-swap-windows)
(exwm-input-set-key (kbd "s-c") #'helm-resume)
(exwm-input-set-key (kbd "s-b") #'helm-mini)
(with-eval-after-load 'emms
(exwm-input-set-key (kbd "s-A") #'helm-emms))
(exwm-input-set-key (kbd "s-f") #'helm-find-files)
(exwm-input-set-key (kbd "s-g") #'helm-grep-git-or-ag)
(exwm-input-set-key (kbd "s-G") #'helm-grep-git-all-or-ag))
@ -94,7 +92,9 @@
(exwm-input-set-key (kbd "s-v") #'magit-status))
(when (fboundp 'emms-all)
(exwm-input-set-key (kbd "s-a") #'emms-smart-browse)
(exwm-input-set-key (kbd "s-A") #'emms))
(if (fboundp 'helm-emms)
(exwm-input-set-key (kbd "s-A") #'helm-emms)
(exwm-input-set-key (kbd "s-A") #'emms)))
(when (delq nil (mapcar (lambda (path) (string-match "/mu4e/\\|/mu4e$" path)) load-path))
(exwm-input-set-key (kbd "s-m") #'mu4e-headers))

View File

@ -227,7 +227,8 @@ Requires `call-process-to-string' from `functions'."
(helm-top-poll-mode)
;;; Column indices might need some customizing. See `helm-top-command' and
;;; https://github.com/emacs-helm/helm/issues/1586.
;;; https://github.com/emacs-helm/helm/issues/1586 and
;;; https://github.com/emacs-helm/helm/issues/1909.
;;; Fallback on 'find' if 'locate' is not available.
(unless (executable-find "locate")