ambrevar/storage: Export write-roots-index.

2021-06-03 08:02:26 +02:00 · 2021-06-03 08:02:26 +02:00 · 114564c9e1
parent 8d73f73f70
commit 114564c9e1
1 changed files with 1 additions and 0 deletions
--- 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)