;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2018 Mathieu Othacehe <m.othacehe@gmail.com>
;;;
;;; 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 (gnu installer hostname)
  #:export (hostname->configuration))

(define (hostname->configuration hostname)
  `((host-name ,hostname)))
td class='sub'>Wojtek's customized Guix</td><td class='sub right'></td></tr></table>
<table class='tabs'><tr><td>
<a href='/guix/about/'>about</a><a href='/guix/'>summary</a><a href='/guix/refs/?id=8781f377e04dff56f1ce0cda34b88ad202da343d'>refs</a><a class='active' href='/guix/log/tests/gnu-maintenance.scm'>log</a><a href='/guix/tree/tests/gnu-maintenance.scm?id=8781f377e04dff56f1ce0cda34b88ad202da343d'>tree</a><a href='/guix/commit/tests/gnu-maintenance.scm?id=8781f377e04dff56f1ce0cda34b88ad202da343d'>commit</a><a href='/guix/diff/tests/gnu-maintenance.scm?id=8781f377e04dff56f1ce0cda34b88ad202da343d'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/tests/gnu-maintenance.scm'>
<input type='hidden' name='id' value='8781f377e04dff56f1ce0cda34b88ad202da343d'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' 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=8781f377e04dff56f1ce0cda34b88ad202da343d'>root</a>/<a href='/guix/log/tests?id=8781f377e04dff56f1ce0cda34b88ad202da343d'>tests</a>/<a href='/guix/log/tests/gnu-maintenance.scm?id=8781f377e04dff56f1ce0cda34b88ad202da343d'>gnu-maintenance.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/tests/gnu-maintenance.scm?id=8781f377e04dff56f1ce0cda34b88ad202da343d&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2023-09-27 23:38:21 +0200'>2023-09-27</span></td><td><a href='/guix/commit/tests/gnu-maintenance.scm?id=72fc91b113564f8006094c0118f06af0f414d21b'>tests: ‘rewrite-url’ test no longer depends on network access.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes &lt;https://issues.guix.gnu.org/66097&gt;.
Previously, this test would actually need to access dist.libuv.org.

* tests/gnu-maintenance.scm ("rewrite-url, without to-version"): Change
URLs from https to http, and from libuv.org to libuv.example.org.
Parameterize ‘current-http-proxy’.

Reported-by: Janneke Nieuwenhuizen &lt;janneke@gnu.org&gt;
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2023-08-26 11:38:56 -0400'>2023-08-26</span></td><td><a href='/guix/commit/tests/gnu-maintenance.scm?id=1dce88777691b7a38ad66ba58b17a9b368c11e07'>gnu-maintenance: Consider Qt source tarballs as "release files".</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/gnu-maintenance.scm (release-file?): Use positive logic in doc.
Add a special case for Qt source archives.
* tests/gnu-maintenance.scm ("release-file?"): Update test.
</span></span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2023-08-26 11:38:56 -0400'>2023-08-26</span></td><td><a href='/guix/commit/tests/gnu-maintenance.scm?id=6953fb924111c400a064255d8274a2caa68f7436'>gnu-maintenance: Add support to rewrite version in URL path.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes &lt;https://issues.guix.gnu.org/64015&gt;.
Fixes &lt;https://issues.guix.gnu.org/65304&gt;.

Previously, the generic HTML updater would only look for the list of files
found at the parent of its current source URL, ignoring that the URL may embed
the version elsewhere in its path.  This could cause 'guix refresh' to report
no updates available, while in fact there were, such as for 'libuv'.

* guix/gnu-maintenance.scm (strip-trailing-slash): New procedure.
(%version-rx): New variable.
(rewrite-url): New procedure.
(import-html-release): New rewrite-url? argument.  When true, use the above
procedure.
(import-html-updatable-release): Call import-html-release with #:rewrite-url
set to #t.
* tests/gnu-maintenance.scm ("rewrite-url, to-version specified")
("rewrite-url, without to-version"): New tests.
</span></span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2023-01-02 00:06:51 +0100'>2023-01-02</span></td><td><a href='/guix/commit/tests/gnu-maintenance.scm?id=d7a9d72bb02a2a3b1a99183655bf878547116032'>tests: Fix gnu-maintenance tests.</a><span class='msg-avail'>...<span class='msg-tooltip'>The regression was introduce with commit
a274a6a1acb99738f02de7b226e6a0d3883ec353 ("upstream-updater: Rename record
field.")

* tests/tests/gnu-maintenance.scm: ("latest-html-release, scheme-less URIs",
  "latest-html-release, no signature", "latest-html-release, signature"):
  Replace upstream-updater-latest by upstream-updater-import.

Reported-by: Ricardo Wurmus &lt;rekado@elephly.net&gt;
</span></span></td><td>Hartmut Goebel</td></tr>
<tr><td><span title='2022-11-11 23:17:43 +0100'>2022-11-11</span></td><td><a href='/guix/commit/tests/gnu-maintenance.scm?id=c6cb7243fbf4dfb7766874e403ce0f74f05933a3'>gnu-maintenance: 'release-file?' excludes "valgrind-3.20.0.RC1.tar.bz2".</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/gnu-maintenance.scm (%alpha-tarball-rx): Add "." before
"(alpha|beta|...)".
* tests/gnu-maintenance.scm ("release-file?"): Add test for Valgrind.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2022-09-26 23:29:37 +0200'>2022-09-26</span></td><td><a href='/guix/commit/tests/gnu-maintenance.scm?id=5c37ad812b94de76ab45bb15a25aaf7895fb0c66'>gnu-maintenance: Test latest-html-release.</a><span class='msg-avail'>...<span class='msg-tooltip'>* tests/gnu-maintenance.scm ("latest-html-release, no signature")
("latest-html-release, signature): New tests.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Maxime Devos</td></tr>
<tr><td><span title='2022-09-17 19:09:45 +0200'>2022-09-17</span></td><td><a href='/guix/commit/tests/gnu-maintenance.scm?id=c967d1153cae419e4acbe0dbed8f558d95ced0e3'>gnu-maintenance: Support // URLs in latest-html-release.</a><span class='msg-avail'>...<span class='msg-tooltip'>This makes "./pre-inst-env guix refresh -u" download the release tarball from
the right place -- previously, it downloaded from

https://www.libreoffice.org//download.documentfoundation.org/libreoffice/src/7.4.0/libreoffice-7.4.0.3.tar.xz?idx=1

whereas it should download from

https://download.documentfoundation.org/libreoffice/src/7.4.0/libreoffice-7.4.0.3.tar.xz?idx=1

instead.

* guix/gnu-maintenance.scm (latest-html-release)[url-release]: Adjust
computation in the case of an absolute URI-reference without a scheme.
* tests/gnu-maintenance.scm ("latest-html-release, scheme-less URIs"):
Test it.

Signed-off-by: Christopher Baines &lt;mail@cbaines.net&gt;
</span></span></td><td>Maxime Devos</td></tr>