branch: scratch/editorconfig-cc
commit 4fd932bb7cfbe54c93d21811f8142db921737dcd
Author: 10sr <8slashes+...@gmail.com>
Commit: Stefan Monnier <monn...@iro.umontreal.ca>
Check package metadata using ert framework
---
Makefile | 23 +----------------------
ert-tests/metadata.el | 12 ++++++++++++
2 files changed, 13 insertions(+), 22 deletions(-)
diff --git a/Makefile b/Makefile
index 8f71fabeb7..2d6ae079f3 100644
--- a/Makefile
+++ b/Makefile
@@ -26,6 +26,7 @@ test: test-ert test-core test-metadata $(OBJS)
test-ert: $(ERT_TESTS) $(OBJS)
$(EMACS) $(BATCHFLAGS) \
--eval "(require 'ert) (setq debug-on-error t)" \
+ --eval "(setq metadata-el-files '($(SRCS:%=\"%\")))" \
$(ERT_TESTS:%=-l "%") \
-f ert-run-tests-batch-and-exit
@@ -41,25 +42,3 @@ test-core: core-test/CMakeLists.txt $(OBJS)
cd $(PROJECT_ROOT_DIR)/core-test && \
EMACS_BIN=$(EMACS)
EDITORCONFIG_CORE_LIBRARY_PATH="$(PROJECT_ROOT_DIR)" \
ctest --output-on-failure .
-
-
-# Check package metadata
-
-ELISP_GET_FILE_PACKAGE_METADATA = \
- (lambda (f) \
- (with-temp-buffer \
- (insert-file-contents-literally f) \
- (package-buffer-info)))
-
-ELISP_PRINT_METADATA = \
- (mapc \
- (lambda (f) \
- (message \"Loading info: %s\" f) \
- (message \"%S\" (funcall
$(ELISP_GET_FILE_PACKAGE_METADATA) f))) \
- command-line-args-left)
-
-test-metadata: $(SRCS)
- $(EMACS) -batch -Q \
- --eval "(require 'package)" \
- --eval "$(ELISP_PRINT_METADATA)" \
- $^
diff --git a/ert-tests/metadata.el b/ert-tests/metadata.el
new file mode 100644
index 0000000000..d762752209
--- /dev/null
+++ b/ert-tests/metadata.el
@@ -0,0 +1,12 @@
+(require 'package)
+
+(defvar metadata-el-files nil)
+
+(ert-deftest test-metadata ()
+ (dolist (el metadata-el-files)
+ (message "Loading info: %s"
+ el)
+ (with-temp-buffer
+ (insert-file-contents el)
+ (message "%S"
+ (package-buffer-info)))))
