emacs-elpa-diffs
[Top][All Lists]
Advanced

[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"



reply via email to

[Prev in Thread] Current Thread [Next in Thread]