TakeV/spacemacs
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

tests: update configuration layers func. tests

Browse source
This commit is contained in:
syl20bnr 2015-09-09 23:51:05 -04:00
parent a767ad6e21
commit 71ce9968d9
1 changed files with 6 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
tests/core/core-configuration-layer-ftest.el
View file

@ -15,14 +15,15 @@
;; configuration-layer//declare-layers ;; configuration-layer//declare-layers
;; --------------------------------------------------------------------------- ;; ---------------------------------------------------------------------------
(ert-deftest test-declare-layers--spacemacs-layer-always-first () (ert-deftest test-declare-layers--distribution-layer-always-first ()
(let ((dotspacemacs-configuration-layers '(spacemacs (let ((dotspacemacs-distribution 'spacemacs)
emacs-lisp (dotspacemacs-configuration-layers '(emacs-lisp
(git :variables foo 'bar)))) (git :variables foo 'bar))))
(configuration-layer//declare-layers) (configuration-layer//declare-layers)
(should (eq 'spacemacs (oref (first configuration-layer--layers) :name))))) (should (eq 'spacemacs (oref (first configuration-layer--layers) :name)))))
(ert-deftest test-declare-layers--spacemacs-layer-always-first-all () (ert-deftest test-declare-layers--distribution-layer-always-first-all ()
(let ((dotspacemacs-configuration-layers 'all)) (let ((dotspacemacs-distribution 'spacemacs)
(dotspacemacs-configuration-layers 'all))
(configuration-layer//declare-layers) (configuration-layer//declare-layers)
(should (eq 'spacemacs (oref (first configuration-layer--layers) :name))))) (should (eq 'spacemacs (oref (first configuration-layer--layers) :name)))))