Copied from Debian.

From: Santiago Vila <sanvila@debian.org>
Subject: zipinfo.c: Do not crash when hostver byte is >= 100

--- a/zipinfo.c
+++ b/zipinfo.c
@@ -2114,7 +2114,7 @@
             else
                 attribs[9] = (xattr & UNX_ISVTX)? 'T' : '-';  /* T==undefined */
 
-            sprintf(&attribs[12], "%u.%u", hostver/10, hostver%10);
+            sprintf(&attribs[11], "%2u.%u", hostver/10, hostver%10);
             break;
 
     } /* end switch (hostnum: external attributes format) */
ref='/guix/'>guix</a></td><td class='form'><form method='get'>
<input type='hidden' name='id' value='717dba1c53be500cb7e32efbbaa0487bd0825bad'/><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=717dba1c53be500cb7e32efbbaa0487bd0825bad'>refs</a><a class='active' href='/guix/log/etc/completion/zsh'>log</a><a href='/guix/tree/etc/completion/zsh?id=717dba1c53be500cb7e32efbbaa0487bd0825bad'>tree</a><a href='/guix/commit/etc/completion/zsh?id=717dba1c53be500cb7e32efbbaa0487bd0825bad'>commit</a><a href='/guix/diff/etc/completion/zsh?id=717dba1c53be500cb7e32efbbaa0487bd0825bad'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/etc/completion/zsh'>
<input type='hidden' name='id' value='717dba1c53be500cb7e32efbbaa0487bd0825bad'/><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=717dba1c53be500cb7e32efbbaa0487bd0825bad'>root</a>/<a href='/guix/log/etc?id=717dba1c53be500cb7e32efbbaa0487bd0825bad'>etc</a>/<a href='/guix/log/etc/completion?id=717dba1c53be500cb7e32efbbaa0487bd0825bad'>completion</a>/<a href='/guix/log/etc/completion/zsh?id=717dba1c53be500cb7e32efbbaa0487bd0825bad'>zsh</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/etc/completion/zsh?id=717dba1c53be500cb7e32efbbaa0487bd0825bad&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2021-10-24 20:17:05 +0200'>2021-10-24</span></td><td><a href='/guix/commit/etc/completion/zsh?id=55f6d9e818512b4e3e4adacfa99deb201b6854be'>etc: completion: Filter gratuitous spaces from available packages.</a><span class='msg-avail'>...<span class='msg-tooltip'>Tested with:

  guix environment --{ad-hoc,pure} zsh guix bash-completion coreutils -- zsh
  % fpath=(~/guix/etc/completion/zsh $fpath)
  % autoload -U compinit; compinit

* etc/completion/zsh/_guix (_guix_list_available_packages): Remove spaces.

Co-authored-by: Tobias Geerinckx-Rice &lt;me@tobias.gr&gt;
</span></span></td><td>Liliana Marie Prikler</td></tr>
<tr><td><span title='2021-08-28 17:57:50 +0200'>2021-08-28</span></td><td><a href='/guix/commit/etc/completion/zsh?id=a8dd285d5a0670abf124a721e6ba94da045b24ba'>zsh completion: Add missing commands and arguments.</a><span class='msg-avail'>...<span class='msg-tooltip'>* etc/completion/zsh/_guix (_guix_install, _guix_remove, _guix_upgrade):
  New functions.
  (_guix_build, _guix_challenge, _guix_download, _guix_environment,
  _guix_packages, _guix_gc, _guix_hash, _guix_lint, _guix_package,
  _guix_publish, _guix_pull, _guix_refresh, _guix_size, _guix_system):
  Add some of the missing arguments.
  (_guix_cmds): Add missing commands.

Co-authored-by: Brice Waegeneire &lt;brice@waegenei.re&gt;
</span></span></td><td>Noah Evans</td></tr>
<tr><td><span title='2021-02-17 10:52:28 +0100'>2021-02-17</span></td><td><a href='/guix/commit/etc/completion/zsh?id=ee2a5da80a9bda25542c00a7a35a9ddddcbd58af'>scripts: system: Remove 'vm-image' command.</a><span class='msg-avail'>...<span class='msg-tooltip'>Remove the 'vm-image' command that has been superseded by the 'image'
command.

* gnu/system/vm.scm (system-qemu-image): Remove it.
* guix/scripts/system.scm (system-derivation-for-action): Mark 'vm-image'
command as deprecated and use the image API to produce the VM image.
(perform-action, show-help): Adapt accordingly.
* tests/guix-system.sh: Ditto.
* doc/guix.texi (Invoking guix system,
Running Guix in a VM): Ditto.
* etc/completion/fish/guix.fish: Ditto.
* etc/completion/zsh/_guix: Ditto.
</span></span></td><td>Mathieu Othacehe</td></tr>