Fix a file descriptor leak:

https://github.com/xinetd-org/xinetd/issues/23

Patch copied from Debian:

https://anonscm.debian.org/cgit/collab-maint/xinetd.git/tree/debian/patches/000012-fix_fd_leak

Patch sent upstream at https://github.com/xinetd-org/xinetd/pull/26.

diff --git a/xinetd/xgetloadavg.c b/xinetd/xgetloadavg.c
index 5a26214..fe0f872 100644
--- a/xinetd/xgetloadavg.c
+++ b/xinetd/xgetloadavg.c
@@ -34,7 +34,7 @@ double xgetloadavg(void)
 
    if( fscanf(fd, "%lf", &ret) != 1 ) {
       perror("fscanf");
-      return -1;
+      ret = -1;
    }
 
    fclose(fd);
-- 
2.7.4

thod='get'>
<input type='hidden' name='id' value='db8a0b480a05dda5f86981128569c589d6abc5b8'/><select name='h' onchange='this.form.submit();'>
<option value='koszko' selected='selected'>koszko</option>
<option value='koszko-scripts'>koszko-scripts</option>
</select> <input type='submit' value='switch'/></form></td></tr>
<tr><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=db8a0b480a05dda5f86981128569c589d6abc5b8'>refs</a><a class='active' href='/guix/log/gnu/tests/lightdm.scm'>log</a><a href='/guix/tree/gnu/tests/lightdm.scm?id=db8a0b480a05dda5f86981128569c589d6abc5b8'>tree</a><a href='/guix/commit/gnu/tests/lightdm.scm?id=db8a0b480a05dda5f86981128569c589d6abc5b8'>commit</a><a href='/guix/diff/gnu/tests/lightdm.scm?id=db8a0b480a05dda5f86981128569c589d6abc5b8'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/tests/lightdm.scm'>
<input type='hidden' name='id' value='db8a0b480a05dda5f86981128569c589d6abc5b8'/><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=db8a0b480a05dda5f86981128569c589d6abc5b8'>root</a>/<a href='/guix/log/gnu?id=db8a0b480a05dda5f86981128569c589d6abc5b8'>gnu</a>/<a href='/guix/log/gnu/tests?id=db8a0b480a05dda5f86981128569c589d6abc5b8'>tests</a>/<a href='/guix/log/gnu/tests/lightdm.scm?id=db8a0b480a05dda5f86981128569c589d6abc5b8'>lightdm.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/tests/lightdm.scm?id=db8a0b480a05dda5f86981128569c589d6abc5b8&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2023-07-19 10:38:15 -0400'>2023-07-19</span></td><td><a href='/guix/commit/gnu/tests/lightdm.scm?id=1d837aaa32a3a2de8f4a1ac391f92effba50834e'>tests: lightdm: Bump timeout waiting for screen text to 60 seconds.</a><span class='msg-avail'>...<span class='msg-tooltip'>This is to avoid non-deterministic failures on slower machines.

* gnu/tests/lightdm.scm (run-lightdm-test) &lt;wait-for-screen-text&gt;: Bump
timeout to 60 s (from the default 30 s).
</span></span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2023-07-09 22:51:08 -0400'>2023-07-09</span></td><td><a href='/guix/commit/gnu/tests/lightdm.scm?id=65c77f608916f0c206d0d821db1afa2558c5a74f'>gnu: lightdm: Apply patch to fix VNC server address binding ordering.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/patches/lightdm-vnc-ipv6.patch: New patch file.
* gnu/local.mk (dist_patch_DATA): Register it.
* gnu/packages/display-managers.scm (lightdm): Apply it.
* gnu/tests/lightdm.scm (run-lightdm-test): Remove comment and expected fail
directive for the "can connect to TCP port 5900 on IPv6" test.

Suggested-by: Bruno Victal &lt;mirai@makinata.eu&gt;
</span></span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2023-03-21 16:53:27 -0400'>2023-03-21</span></td><td><a href='/guix/commit/gnu/tests/lightdm.scm?id=b7506eb334d1cfceca78682879c69edf525c8ccd'>services: Add x11-socket-directory-service-type.</a><span class='msg-avail'>...<span class='msg-tooltip'>The x11-socket-directory-service misuses activation-service-type
to create directories. This kind of usage is incorrect since
activation-service-type does not depend on file-systems, hence incompatible
with user defined /tmp mount.

This commit turns x11-socket-directory-service into a shepherd one-shot
service by defining a new x11-socket-directory-service-type.

* gnu/services/desktop.scm (x11-socket-directory-service-type): New variable.
(x11-socket-directory-service): Deprecate procedure.
(desktop-services-for-system): Use new service-type.
* gnu/tests/lightdm.scm: Ditto.

Reviewed-by: Josselin Poiret &lt;dev@jpoiret.xyz&gt;
Signed-off-by: Maxim Cournoyer &lt;maxim.cournoyer@gmail.com&gt;
</span></span></td><td>Bruno Victal</td></tr>
<tr><td><span title='2023-03-03 17:55:35 +0100'>2023-03-03</span></td><td><a href='/guix/commit/gnu/tests/lightdm.scm?id=2799ad44234be675f018115f99be98d2c9fd565d'>services: dbus: Deprecate 'dbus-service' procedure.</a><span class='msg-avail'>...<span class='msg-tooltip'>* doc/guix.texi (Desktop Services): Replace with 'dbus-root-service-type'.
Document dbus-configuration.
* gnu/services/dbus.scm (dbus-service): Define with 'define-deprecated'.
* gnu/services/desktop.scm (desktop-services-for-system): Replace with
dbus-root-service-type.
* gnu/system/install.scm (%installation-services): Ditto.
* gnu/tests/base.scm (%avahi-os): Ditto.
* gnu/tests/docker.scm (%docker-os): Ditto.
* gnu/tests/lightdm.scm (minimal-desktop-services): Ditto.
* gnu/tests/virtualization.scm (%libvirt-os): Ditto.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Bruno Victal</td></tr>
<tr><td><span title='2023-03-03 17:55:33 +0100'>2023-03-03</span></td><td><a href='/guix/commit/gnu/tests/lightdm.scm?id=c3dc13e29c624609b851ef50db343074fad2d7cb'>services: desktop: Deprecate 'accountsservice-service' procedure.</a><span class='msg-avail'>...<span class='msg-tooltip'>* doc/guix.texi (Desktop Services): Replace 'accountsservice-service'
with 'accountsservice-service-type'.
* gnu/services/desktop.scm (accountsservice-service): Deprecate procedure.
(desktop-services-for-system): Use accountsservice-service-type.
* gnu/tests/lightdm.scm (minimal-desktop-services): Ditto.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Bruno Victal</td></tr>
<tr><td><span title='2023-03-03 17:55:33 +0100'>2023-03-03</span></td><td><a href='/guix/commit/gnu/tests/lightdm.scm?id=00767d967d2f70d53bb7494ac09e0e7c44323697'>services: desktop: Deprecate 'elogind-service' procedure.</a><span class='msg-avail'>...<span class='msg-tooltip'>* doc/guix.texi (Desktop Services): Replace 'elogind-service' with
'elogind-service-type'.
* gnu/services/desktop.scm (elogind-service): Deprecate procedure.
(desktop-services-for-system): Use elogind-service-type.
* gnu/tests/lightdm.scm (minimal-desktop-services): Ditto.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Bruno Victal</td></tr>