From 114564c9e1a374ff0140abc8670ac0a9d97ba6e1 Mon Sep 17 00:00:00 2001 From: Pierre Neidhardt Date: Thu, 3 Jun 2021 08:02:26 +0200 Subject: [PATCH] ambrevar/storage: Export write-roots-index. --- .local/share/common-lisp/source/ambrevar/storage.lisp | 1 + 1 file changed, 1 insertion(+) diff --git a/.local/share/common-lisp/source/ambrevar/storage.lisp b/.local/share/common-lisp/source/ambrevar/storage.lisp index c5f8ba48..2718664b 100644 --- a/.local/share/common-lisp/source/ambrevar/storage.lisp +++ b/.local/share/common-lisp/source/ambrevar/storage.lisp @@ -73,6 +73,7 @@ If DESTINATION ends with '.gpg', it gets GPG-encrypted." nil sorted-index))) +(export-always 'write-roots-index) (defun write-roots-index (&optional (destination (personal "index"))) "Write indexes of `roots' sub-directories to DESTINATION." (labels ((write-simple-index (target &rest destination-subdir)