[elpa] externals/objed 1054cd8 03/21: Compile tests like elpa does, and fix the compile errors in tests

[Clemens Radermacher]

branch: externals/objed
commit 1054cd893a4c2c6cc93ab6f37aedce014634fa05
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>

    Compile tests like elpa does, and fix the compile errors in tests
---
 Makefile             |  2 ++
 test/make-compile.el |  6 +++++-
 test/make-lint.el    | 12 ++++++------
 3 files changed, 13 insertions(+), 7 deletions(-)

diff --git a/Makefile b/Makefile
index 605ca19..2bb0651 100644
--- a/Makefile
+++ b/Makefile
@@ -15,5 +15,7 @@ test: compile lint
 
 clean:
        rm -f *.elc
+       rm -f test/*.elc        
+
 
 .PHONY: update lint compile test clean
diff --git a/test/make-compile.el b/test/make-compile.el
index e7bff0f..72dc831 100644
--- a/test/make-compile.el
+++ b/test/make-compile.el
@@ -4,8 +4,12 @@
 (setq byte-compile-error-on-warn t)
 (setq byte-compile--use-old-handlers nil)
 
-
 ;; compile *.el files
 (dolist (file (file-expand-wildcards "*.el"))
   (unless (byte-compile-file file)
     (kill-emacs 1)))
+
+(let ((default-directory (expand-file-name "test" default-directory)))
+  (dolist (file (file-expand-wildcards "*.el"))
+    (unless (byte-compile-file file)
+      (kill-emacs 1))))
diff --git a/test/make-lint.el b/test/make-lint.el
index b2b362e..d645db8 100644
--- a/test/make-lint.el
+++ b/test/make-lint.el
@@ -18,16 +18,16 @@
 
 
 ;; package lint
+(declare-function address@hidden "ext:package-lint")
+(declare-function package-lint--test-keyseq "ext:package-lint")
+(declare-function package-lint--check-eval-after-load "ext:package-lint")
+(declare-function package-lint-buffer "ext:package-lint")
 (when (require 'package-lint nil t)
   (define-advice package-lint--get-package-prefix (:override () objed)
     "Use objed as prefix for all files."
     "objed")
-  (define-advice package-lint--check-eval-after-load
-      (:override () ignore)
-    nil)
-  (define-advice package-lint--test-keyseq
-      (:override (_) ignore)
-    nil)
+  (fset #'package-lint--test-keyseq #'ignore)
+  (fset #'package-lint--check-eval-after-load #'ignore)
   (let ((success t))
     (dolist (file (file-expand-wildcards "*.el"))
       (with-temp-buffer