;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012, 2017 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-base16)
  #:use-module (guix base16)
  #:use-module (srfi srfi-1)
  #:use-module (srfi srfi-64)
  #:use-module (rnrs bytevectors))

(test-begin "base16")

(test-assert "bytevector->base16-string->bytevector"
  (every (lambda (bv)
           (equal? (base16-string->bytevector
                    (bytevector->base16-string bv))
                   bv))
         (map string->utf8 '("" "f" "fo" "foo" "foob" "fooba" "foobar"))))

(test-end "base16")
iles/emacs'>log</a><a href='/guix/tree/gnu/packages/aux-files/emacs?id=62ecae83672b185007514c7794c13477271fb256'>tree</a><a href='/guix/commit/gnu/packages/aux-files/emacs?id=62ecae83672b185007514c7794c13477271fb256'>commit</a><a href='/guix/diff/gnu/packages/aux-files/emacs?id=62ecae83672b185007514c7794c13477271fb256'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/packages/aux-files/emacs'>
<input type='hidden' name='id' value='62ecae83672b185007514c7794c13477271fb256'/><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=62ecae83672b185007514c7794c13477271fb256'>root</a>/<a href='/guix/log/gnu?id=62ecae83672b185007514c7794c13477271fb256'>gnu</a>/<a href='/guix/log/gnu/packages?id=62ecae83672b185007514c7794c13477271fb256'>packages</a>/<a href='/guix/log/gnu/packages/aux-files?id=62ecae83672b185007514c7794c13477271fb256'>aux-files</a>/<a href='/guix/log/gnu/packages/aux-files/emacs?id=62ecae83672b185007514c7794c13477271fb256'>emacs</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/aux-files/emacs?id=62ecae83672b185007514c7794c13477271fb256&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2019-12-04 11:06:49 +0100'>2019-12-04</span></td><td><a href='/guix/commit/gnu/packages/aux-files/emacs?id=903765f0d9fee0412e63d960f20b741c5afbcea7'>gnu: emacs: Use load-path instead of EMACSLOADPATH.</a><span class='msg-avail'>...<span class='msg-tooltip'>This enables the use of the subdirs.el feature of Emacs, where specifying a
directory in EMACSLOADPATH translates into a `load-path' variable containing
the directory and all its sub-directories.

* gnu/packages/aux-files/emacs/guix-emacs.el (guix-emacs-autoload-packages):
Use `load-path' directly instead of parsing EMACSLOADPATH.

Reported-by: Leo Prikler &lt;leo.prikler@student.tugraz.at&gt;
Signed-off-by: Clément Lassieur &lt;clement@lassieur.org&gt;
</span></span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2019-12-04 11:06:49 +0100'>2019-12-04</span></td><td><a href='/guix/commit/gnu/packages/aux-files/emacs?id=c320acd633907397bfd3246ba6446d45d2e55ba2'>gnu: emacs: Fix guix-emacs.el indentation.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/aux-files/emacs/guix-emacs.el: Fix indentation.

Signed-off-by: Clément Lassieur &lt;clement@lassieur.org&gt;
</span></span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2019-11-18 14:34:41 +0900'>2019-11-18</span></td><td><a href='/guix/commit/gnu/packages/aux-files/emacs?id=47b3b4c2aa49e21f4cc32c97ff7bbbd069bb849c'>gnu: emacs: Adapt the autoloads auxiliary code to use EMACSLOADPATH.</a><span class='msg-avail'>...<span class='msg-tooltip'>The Elisp directories to scan for autoloads are now taken from EMACSLOADPATH
instead of from the user profile, environment profile or system profile.
Manually adding the Elisp directories to the `load-path' is no longer
necessary, as this is covered by Emacs when they are in EMACSLOADPATH.  The
caching logic is also removed, as this code is not typically run often and the
gain is marginal (loading autoloads files is cheap).

* gnu/packages/aux-files/emacs/guix-emacs.el (guix-emacs-directory)
(guix-emacs-subdirs, guix-emacs-directories): Remove procedures.
(guix-emacs-find-autoloads): Filter the directory entries by passing the
regexp to `directory-files' directly, which is ten times faster.  Remove
deduplication.
(guix-emacs-autoloads-regexp): Remove the group, which used to filter out the
file extension; it no longer works this way due to passing the regexp to the
`directory-files' procedure directly, which doesn't care about groups.
(guix-emacs-autoload-packages): Update doc.  Search package directories from
EMACSLOADPATH.  Do not populate the load-path.  Remove cache.
</span></span></td><td>Maxim Cournoyer</td></tr>