;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2016 Ludovic Courtès <ludo@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.

(define-module (test-upstream)
  #:use-module (guix upstream)
  #:use-module (guix tests)
  #:use-module (srfi srfi-64))


(test-begin "upstream")

;; FIXME: Temporarily skipping this test; see <https://bugs.gnu.org/34229>.
(test-skip 1)

(test-equal "coalesce-sources same version"
  (list (upstream-source
         (package "foo") (version "1")
         (urls '("ftp://example.org/foo-1.tar.xz"
                 "ftp://example.org/foo-1.tar.gz"))
         (signature-urls '("ftp://example.org/foo-1.tar.xz.sig"
                           "ftp://example.org/foo-1.tar.gz.sig"))))

  (coalesce-sources (list (upstream-source
                           (package "foo") (version "1")
                           (urls '("ftp://example.org/foo-1.tar.gz"))
                           (signature-urls
                            '("ftp://example.org/foo-1.tar.gz.sig")))
                          (upstream-source
                           (package "foo") (version "1")
                           (urls '("ftp://example.org/foo-1.tar.xz"))
                           (signature-urls
                            '("ftp://example.org/foo-1.tar.xz.sig"))))))

(test-end)
type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=5c83dd1d64783d4829e42714be41f4c4b0430dbd'>root</a>/<a href='/guix/log/gnu?id=5c83dd1d64783d4829e42714be41f4c4b0430dbd'>gnu</a>/<a href='/guix/log/gnu/packages?id=5c83dd1d64783d4829e42714be41f4c4b0430dbd'>packages</a>/<a href='/guix/log/gnu/packages/skarnet.scm?id=5c83dd1d64783d4829e42714be41f4c4b0430dbd'>skarnet.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/skarnet.scm?id=5c83dd1d64783d4829e42714be41f4c4b0430dbd&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2020-03-12 04:57:41 +0100'>2020-03-12</span></td><td><a href='/guix/commit/gnu/packages/skarnet.scm?id=32df41beef12af9a64f079788ac77a167fb3e5ab'>gnu: s6: Update to 2.9.1.0.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2020-03-11 00:13:56 +0100'>2020-03-11</span></td><td><a href='/guix/commit/gnu/packages/skarnet.scm?id=1fc2a81ef9a2477b8b961042b30ff94ecad6c6d0'>gnu: execline: Update to 2.6.0.0.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2020-03-11 00:13:55 +0100'>2020-03-11</span></td><td><a href='/guix/commit/gnu/packages/skarnet.scm?id=c9cd6d2fb2c68197439d121bf0bdea0f43809332'>gnu: Use HTTPS for skarnet.org sources.</a><span class='msg-avail'>...</span<tr><td><span title='2020-01-17 23:32:33 +0100'>2020-01-17</span></td><td><a href='/guix/commit/gnu/packages/vpn.scm?id=d61043c74f234d707737b4710d9478a57f2a8fc2'>gnu: vpnc: Use HTTPS home page.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
/span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2020-03-11 00:13:55 +0100'>2020-03-11</span></td><td><a href='/guix/commit/gnu/packages/skarnet.scm?id=92a4f18f07a6fc32479d7fab31b0765d31f57a50'>gnu: s6-dns: Update to 2.3.2.0.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2020-03-09 16:01:17 +0100'>2020-03-09</span></td><td><a href='/guix/commit/gnu/packages/skarnet.scm?id=633c32fbd9618fb3dd4dedf724e54ef8922c1297'>gnu: s6: Update to 2.9.0.1.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2020-03-09 16:01:17 +0100'>2020-03-09</span></td><td><a href='/guix/commit/gnu/packages/skarnet.scm?id=bead506555b147aaa438ba50b3b429e758fce324'>gnu: s6-linux-init: Update to 1.0.4.0.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2020-03-07 16:04:20 +0100'>2020-03-07</span></td><td><a href='/guix/commit/gnu/packages/skarnet.scm?id=322ea25c5685b1383e0d9d11aec1e6f528aaf1e7'>gnu: s6-rc: Update to 0.5.1.2.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2020-03-07 16:04:20 +0100'>2020-03-07</span></td><td><a href='/guix/commit/gnu/packages/skarnet.scm?id=072102f651c312d3bbc39093498e456a22648c69'>gnu: s6-portable-utils: Update to 2.2.2.2.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2020-03-07 16:04:20 +0100'>2020-03-07</span></td><td><a href='/guix/commit/gnu/packages/skarnet.scm?id=82853fbf8c209e585db80baf0a6180eb4c97c116'>gnu: s6-networking: Update to 2.3.1.2.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2020-03-07 16:04:20 +0100'>2020-03-07</span></td><td><a href='/guix/commit/gnu/packages/skarnet.scm?id=5cecf3f4e22a8d5b97bba9a46d5967f8e06b0900'>gnu: s6-linux-utils: Update to 2.5.1.2.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>