This repository has been archived on 2024-10-22. You can view files and clone it, but cannot push or open issues or pull requests.
spacemacs/layers/osx/packages.el

85 lines
2.8 KiB
EmacsLisp
Raw Normal View History

(setq osx-packages
'(
exec-path-from-shell
osx-trash
pbcopy
launchctl
reveal-in-osx-finder
helm
))
2015-02-07 04:35:46 +00:00
(when (spacemacs/system-is-mac)
2015-10-08 18:00:02 +00:00
;; Enable built-in trash support via finder API if available (only on Emacs
;; Mac Port)
(when (boundp 'mac-system-move-file-to-trash-use-finder)
(setq mac-system-move-file-to-trash-use-finder t)))
(defun osx/post-init-exec-path-from-shell ()
;; Use GNU ls as `gls' from `coreutils' if available. Add `(setq
;; dired-use-ls-dired nil)' to your config to suppress the Dired warning when
;; not using GNU ls. We must look for `gls' after `exec-path-from-shell' was
;; initialized to make sure that `gls' is in `exec-path'
(when (spacemacs/system-is-mac)
(let ((gls (executable-find "gls")))
(when gls
(setq insert-directory-program gls
dired-listing-switches "-aBhl --group-directories-first")))))
2015-10-08 18:00:02 +00:00
(defun osx/init-osx-trash ()
(use-package osx-trash
:if (and (spacemacs/system-is-mac)
(not (boundp 'mac-system-move-file-to-trash-use-finder)))
:init (osx-trash-setup)))
2015-02-07 04:35:46 +00:00
(defun osx/init-pbcopy ()
(use-package pbcopy
:if (and (spacemacs/system-is-mac) (not (display-graphic-p)))
2015-02-08 04:27:50 +00:00
:init (turn-on-pbcopy)))
2015-07-06 12:17:24 +00:00
(defun osx/init-launchctl ()
(use-package launchctl
:if (spacemacs/system-is-mac)
2015-07-06 12:17:24 +00:00
:defer t
:init
(progn
(add-to-list 'auto-mode-alist '("\\.plist$" . nxml-mode))
(spacemacs/set-leader-keys "al" 'launchctl))
2015-07-06 12:17:24 +00:00
:config
(progn
(evilified-state-evilify launchctl-mode launchctl-mode-map
(kbd "q") 'quit-window
(kbd "s") 'tabulated-list-sort
(kbd "g") 'launchctl-refresh
(kbd "n") 'launchctl-new
(kbd "e") 'launchctl-edit
(kbd "v") 'launchctl-view
(kbd "l") 'launchctl-load
(kbd "u") 'launchctl-unload
(kbd "r") 'launchctl-reload
(kbd "S") 'launchctl-start
(kbd "K") 'launchctl-stop
(kbd "R") 'launchctl-restart
(kbd "D") 'launchctl-remove
(kbd "d") 'launchctl-disable
(kbd "E") 'launchctl-enable
(kbd "i") 'launchctl-info
(kbd "f") 'launchctl-filter
(kbd "=") 'launchctl-setenv
(kbd "#") 'launchctl-unsetenv
(kbd "h") 'launchctl-help))))
2015-07-06 12:17:24 +00:00
(defun osx/init-reveal-in-osx-finder ()
(use-package reveal-in-osx-finder
:if (spacemacs/system-is-mac)
:commands reveal-in-osx-finder))
(defun osx/pre-init-helm ()
;; Use `mdfind' instead of `locate'.
(when (spacemacs/system-is-mac)
(spacemacs|use-package-add-hook helm
:post-config
;; Disable fuzzy matchting to make mdfind work with helm-locate
;; https://github.com/emacs-helm/helm/issues/799
(setq helm-locate-fuzzy-match nil)
(setq helm-locate-command "mdfind -name %s %s"))))