summary refs log tree commit diff
path: root/tests/lint.scm
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2022-03-29 00:03:03 +0300
committerEfraim Flashner <efraim@flashner.co.il>2022-03-29 14:43:14 +0300
commit67213a27592122e05c196c490de2ddf990d6832a (patch)
tree36d107e237ea3435ac9fe9cc9546ed26afc11aca /tests/lint.scm
parent53b04339fe521f486d3017930a419d5ca8a6cffd (diff)
downloadguix-67213a27592122e05c196c490de2ddf990d6832a.tar.gz
download: Use https for main KDE source.
* guix/download.scm (%mirrors)[kde]: Use https URIs for main KDE mirrors.
* tests/lint.scm ("mirror-url: kde suggestion"): New test.
Diffstat (limited to 'tests/lint.scm')
-rw-r--r--tests/lint.scm11
1 files changed, 10 insertions, 1 deletions
diff --git a/tests/lint.scm b/tests/lint.scm
index 6bb24370da..8be74d2604 100644
--- a/tests/lint.scm
+++ b/tests/lint.scm
@@ -5,7 +5,7 @@
 ;;; Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org>
 ;;; Copyright © 2016 Hartmut Goebel <h.goebel@crazy-compilers.com>
 ;;; Copyright © 2017 Alex Kost <alezost@gmail.com>
-;;; Copyright © 2017 Efraim Flashner <efraim@flashner.co.il>
+;;; Copyright © 2017, 2022 Efraim Flashner <efraim@flashner.co.il>
 ;;; Copyright © 2018, 2019 Arun Isaac <arunisaac@systemreboot.net>
 ;;; Copyright © 2020 Timothy Sample <samplet@ngyro.com>
 ;;; Copyright © 2020 Tobias Geerinckx-Rice <me@tobias.gr>
@@ -1102,6 +1102,15 @@
     (single-lint-warning-message
      (check-mirror-url (dummy-package "x" (source source))))))
 
+(test-equal "mirror-url: kde suggestion"
+  "URL should be 'mirror://kde/stable/gcompris/qt/src/gcompris-qt-2.3.tar.xz'"
+  (let ((source (origin
+                  (method url-fetch)
+                  (uri "https://download.kde.org/stable/gcompris/qt/src/gcompris-qt-2.3.tar.xz")
+                  (sha256 %null-sha256))))
+    (single-lint-warning-message
+     (check-mirror-url (dummy-package "x" (source source))))))
+
 (test-equal "github-url"
   '()
   (with-http-server `((200 ,%long-string))