branch: externals/assess
commit 46290f163d4d0acc87f46bf63f5477a03c5efa0d
Author: Phillip Lord <phillip.l...@russet.org.uk>
Commit: Phillip Lord <phillip.l...@russet.org.uk>
Add tests for discover.
---
Makefile | 11 ++++++-----
test/sisyphus-discover-test.el | 6 ++++++
test/sisyphus-test.el | 7 +++++++
3 files changed, 19 insertions(+), 5 deletions(-)
diff --git a/Makefile b/Makefile
index a97bb7f115..497a1990a1 100644
--- a/Makefile
+++ b/Makefile
@@ -8,19 +8,20 @@ export EMACS
all: install test
install:
- cask install
+ EMACS=$(EMACS) cask install
just-test:
- cask exec ert-runner
+ EMACS=$(EMACS) cask exec ert-runner
test: install just-test
package:
- cask package
+ EMACS-$(EMACS) cask package
discover-test:
- cask exec emacs --batch --load sisyphus.el --load sisyphus-discover.el \
- -f sisyphus-discover-run-and-exit-batch
+ EMACS=$(EMACS) cask exec $(EMACS) --batch -l sisyphus.el -l
sisyphus-discover.el -f sisyphus-discover-run-and-exit-batch
.PHONY: test dist
+export:
+ export
diff --git a/test/sisyphus-discover-test.el b/test/sisyphus-discover-test.el
new file mode 100644
index 0000000000..b5e6904f06
--- /dev/null
+++ b/test/sisyphus-discover-test.el
@@ -0,0 +1,6 @@
+(ert-deftest sisyphus-discover-test-has-this-been-defined ()
+ "This test is here so that we can test elsewhere that is has
+actually been defined."
+ (should t))
+
+(provide 'sisyphus-discover-test)
diff --git a/test/sisyphus-test.el b/test/sisyphus-test.el
index 5f0710eb32..c5932d1b94 100644
--- a/test/sisyphus-test.el
+++ b/test/sisyphus-test.el
@@ -459,4 +459,11 @@ This also tests the advice on string=."
(m-buffer-match buffer "defun"))
'font-lock-keyword-face)))
+(ert-deftest sisyphus-discover-test ()
+ "Test to see if another test has been defined, which should be
auto-discovered"
+ (should
+ (get 'sisyphus-discover-test-has-this-been-defined 'ert--test)))
+
+
+
;; #+end_src
