[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/repology cb2bab0 4/4: repology: Silence byte-compiler
From: |
Nicolas Goaziou |
Subject: |
[elpa] externals/repology cb2bab0 4/4: repology: Silence byte-compiler |
Date: |
Sun, 24 Jan 2021 06:23:39 -0500 (EST) |
branch: externals/repology
commit cb2bab042cffb5eb60a792f1de491dd62d82308a
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Commit: Nicolas Goaziou <mail@nicolasgoaziou.fr>
repology: Silence byte-compiler
* repology.el (repology-package-all-fields):
(repology-package-all-status): Move...
* repology-utils.el: ... here.
---
repology-utils.el | 15 +++++++++++++++
repology.el | 30 ++++++++++--------------------
2 files changed, 25 insertions(+), 20 deletions(-)
diff --git a/repology-utils.el b/repology-utils.el
index c94736d..ee7e0b1 100644
--- a/repology-utils.el
+++ b/repology-utils.el
@@ -28,6 +28,21 @@
;;; Code:
+(require 'seq)
+(require 'url)
+
+
+;;; Constants
+(defconst repology-package-all-fields
+ '(repo subrepo name srcname binname visiblename version origversion status
+ summary categories licenses maintainers www downloads)
+ "List of known package fields.")
+
+(defconst repology-package-all-status
+ '("newest" "devel" "unique" "outdated" "legacy" "rolling" "noscheme"
+ "incorrect" "untrusted" "ignored")
+ "List of known status values.")
+
;;; Packages
(defun repology-package-p (object)
diff --git a/repology.el b/repology.el
index e0ccc88..20ab47d 100644
--- a/repology.el
+++ b/repology.el
@@ -82,35 +82,25 @@
;;; Code:
-;;; Upstream Constants
-(defconst repology-base-url "https://repology.org/api/v1/"
- "Base URL for Repology API.")
-
-(defconst repology-package-all-fields
- '(repo subrepo name srcname binname visiblename version origversion status
- summary categories licenses maintainers www downloads)
- "List of known package fields.")
-
-(defconst repology-package-all-status
- '("newest" "devel" "unique" "outdated" "legacy" "rolling" "noscheme"
- "incorrect" "untrusted" "ignored")
- "List of known status values.")
-
-(defconst repology-projects-hard-limit 200
- "Maximum number of projects Repology API can return.
-See URL `https://repology.org/api'.")
-
-
;;; Load Libraries
(require 'json)
+(require 'seq)
(require 'tabulated-list)
(require 'url)
-;; These need to be loaded after upstream constants.
(require 'repology-utils)
(require 'repology-license)
+;;; Upstream Constants
+(defconst repology-base-url "https://repology.org/api/v1/"
+ "Base URL for Repology API.")
+
+(defconst repology-projects-hard-limit 200
+ "Maximum number of projects Repology API can return.
+See URL `https://repology.org/api'.")
+
+
;;; Configuration
(defgroup repology nil
"Repology API access from Emacs"