[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/mentor b8dfa8f3c4 1/3: Make test run check-declare
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/mentor b8dfa8f3c4 1/3: Make test run check-declare |
Date: |
Sun, 30 Oct 2022 10:59:07 -0400 (EDT) |
branch: elpa/mentor
commit b8dfa8f3c43d047af873b181de4a50860483aaf3
Author: Stefan Kangas <stefankangas@gmail.com>
Commit: Stefan Kangas <stefankangas@gmail.com>
Make test run check-declare
---
Makefile | 12 ++++++++----
mentor-data.el | 2 +-
mentor-files.el | 31 +++++++++++++++----------------
mentor-rpc.el | 2 +-
4 files changed, 25 insertions(+), 22 deletions(-)
diff --git a/Makefile b/Makefile
index 02201d0f00..1cc9eab545 100644
--- a/Makefile
+++ b/Makefile
@@ -2,24 +2,28 @@ EMACS=emacs
EMACS_BATCH = $(EMACS) -Q -batch
ELPADIR = $(HOME)/.emacs.d/elpa
SUBDIRS = $(shell find $(ELPADIR) -mindepth 1 -maxdepth 1 -type d)
-EMACS_LOADPATH = -L . $(patsubst %,-L %, $(SUBDIRS))
+EMACS_LOADPATH = -L . $(patsubst %,-L %, $(SUBDIRS)) -L ../url-scgi
EMACS_LOAD = $(EMACS_BATCH) $(EMACS_LOADPATH)
TARGET=$(patsubst %.el,%.elc,$(wildcard *.el))
-.PHONY: all clean tags test
+.PHONY: all clean tags test check-declare
.PRECIOUS: %.elc
all: $(TARGET)
%.elc: %.el
+ @echo "Compiling $<"
@$(EMACS_LOAD) -f batch-byte-compile $<
+check-declare:
+ @$(EMACS_LOAD) --eval '(check-declare-directory default-directory)'
+
clean:
- rm -f $(TARGET) TAGS
+ rm -f $(TARGET) TAGS *.elc test/*.elc
tags:
etags mentor*.el
-test:
+test: all check-declare
@$(EMACS_LOAD) -l test/mentor-rpc-tests.el -f
ert-run-tests-batch-and-exit
@$(EMACS_LOAD) -l test/mentor-tests.el -f ert-run-tests-batch-and-exit
diff --git a/mentor-data.el b/mentor-data.el
index 49aa4ccb49..bded470b94 100644
--- a/mentor-data.el
+++ b/mentor-data.el
@@ -29,7 +29,7 @@
(require 'cl-lib)
-(declare-function mentor-view-torrent-list-add "mentor.el")
+(declare-function mentor-view-torrent-list-add "mentor")
(defconst mentor-rpc-t-multicall-sep "#")
(cl-defstruct mentor-item
diff --git a/mentor-files.el b/mentor-files.el
index 3dea699bfd..1a3070dda9 100644
--- a/mentor-files.el
+++ b/mentor-files.el
@@ -31,22 +31,21 @@
(defvar mentor-set-priority-fun)
(defvar mentor-item-update-this-fun)
(defvar mentor--columns-var)
-(declare-function mentor-get-item-at-point "mentor.el")
-(declare-function mentor-mode "mentor.el")
-(declare-function mentor-item-property "mentor.el")
-(declare-function mentor-init-header-line "mentor.el")
-(declare-function mentor-get-item-type "mentor.el")
-(declare-function mentor-forward-item "mentor.el")
-(declare-function mentor-beginning-of-item "mentor.el")
-(declare-function mentor-limit-num "mentor.el")
-(declare-function find-if "mentor.el")
-(declare-function mentor-rpc-methods-to-properties "mentor.el")
-(declare-function mentor-process-view-columns "mentor.el")
-(declare-function mentor-previous-item "mentor.el")
-(declare-function mentor-mark "mentor.el")
-(declare-function mentor-reload-header-line "mentor.el")
-(declare-function mentor-bytes-to-human "mentor.el")
-(declare-function mentor-rpc-command "mentor-rpc.el")
+(declare-function mentor-get-item-at-point "mentor-data")
+(declare-function mentor-mode "mentor")
+(declare-function mentor-item-property "mentor-data")
+(declare-function mentor-init-header-line "mentor")
+(declare-function mentor-get-item-type "mentor")
+(declare-function mentor-forward-item "mentor")
+(declare-function mentor-beginning-of-item "mentor")
+(declare-function mentor-limit-num "mentor")
+(declare-function mentor-rpc-methods-to-properties "mentor-rpc")
+(declare-function mentor-process-view-columns "mentor")
+(declare-function mentor-previous-item "mentor")
+(declare-function mentor-mark "mentor")
+(declare-function mentor-reload-header-line "mentor")
+(declare-function mentor-bytes-to-human "mentor")
+(declare-function mentor-rpc-command "mentor-rpc")
(cl-defstruct mentor-file
"Datastructure containing information about torrent files.
diff --git a/mentor-rpc.el b/mentor-rpc.el
index c36c68a7e9..23bac5661f 100644
--- a/mentor-rpc.el
+++ b/mentor-rpc.el
@@ -39,7 +39,7 @@
;; Silence compiler warnings
(defvar mentor-current-view)
-(declare-function mentor-view-torrent-list-clear "mentor.el")
+(declare-function mentor-view-torrent-list-clear "mentor")
(defun mentor-rpc-command (&rest args)
"Run command as an XML-RPC call to rtorrent.