spacemacs layer: use quelpa to install spray

This commit is contained in:
syl20bnr 2015-08-04 21:06:50 -04:00
parent 13b77479fb
commit 85f3f27eff
4 changed files with 27 additions and 28 deletions

3
.gitmodules vendored
View file

@ -13,6 +13,3 @@
[submodule "spacemacs/extensions/helm-rcirc"]
path = spacemacs/extensions/helm-rcirc
url = https://github.com/syl20bnr/helm-rcirc
[submodule "spacemacs/extensions/spray"]
path = spacemacs/extensions/spray
url = https://github.com/syl20bnr/spray

View file

@ -25,7 +25,6 @@
helm-spacemacs
solarized-theme
spacemacs-theme
spray
zoom-frm
;; hack to be able to wrap built-in emacs modes in an init function
emacs-builtin-process-menu
@ -106,29 +105,6 @@
(add-hook 'kill-emacs-hook 'emacs-save-layout)
(add-hook 'after-init-hook 'emacs-load-layout t))))
(defun spacemacs/init-spray ()
(use-package spray
:commands spray-mode
:init
(progn
(defun spacemacs/start-spray ()
"Start spray speed reading on current buffer at current point."
(interactive)
(evil-insert-state)
(spray-mode t)
(evil-insert-state-cursor-hide))
(evil-leader/set-key "asr" 'spacemacs/start-spray)
(defadvice spray-quit (after spacemacs//quit-spray activate)
"Correctly quit spray."
(set-default-evil-insert-state-cursor)
(evil-normal-state)))
:config
(progn
(define-key spray-mode-map (kbd "h") 'spray-backward-word)
(define-key spray-mode-map (kbd "l") 'spray-forward-word)
(define-key spray-mode-map (kbd "q") 'spray-quit))))
(defun spacemacs/init-solarized-theme ()
(use-package solarized
:init

@ -1 +0,0 @@
Subproject commit 70bf09465080294835afd09780b055d206ff0065

View file

@ -97,6 +97,7 @@
smartparens
smooth-scrolling
spacemacs-theme
spray
subword
undo-tree
use-package
@ -3285,6 +3286,32 @@ one of `l' or `r'."
(ad-disable-advice 'isearch-repeat 'after 'isearch-smooth-scroll)
(ad-activate 'isearch-repeat)))
(defun spacemacs/init-spray ()
(use-package spray
:quelpa (spray
:fetcher github
:repo "ian-kelling/spray")
:commands spray-mode
:init
(progn
(defun spacemacs/start-spray ()
"Start spray speed reading on current buffer at current point."
(interactive)
(evil-insert-state)
(spray-mode t)
(evil-insert-state-cursor-hide))
(evil-leader/set-key "asr" 'spacemacs/start-spray)
(defadvice spray-quit (after spacemacs//quit-spray activate)
"Correctly quit spray."
(set-default-evil-insert-state-cursor)
(evil-normal-state)))
:config
(progn
(define-key spray-mode-map (kbd "h") 'spray-backward-word)
(define-key spray-mode-map (kbd "l") 'spray-forward-word)
(define-key spray-mode-map (kbd "q") 'spray-quit))))
(defun spacemacs/init-subword ()
(unless (version< emacs-version "24.4")
(use-package subword