ambrevar/guix: Fix to use the new ambrevar/file:list-directory.
parent
2ebae67f8e
commit
a1e937414c
|
@ -67,7 +67,7 @@
|
||||||
(sort (mapcar #'pair-item-with-disk-usage
|
(sort (mapcar #'pair-item-with-disk-usage
|
||||||
(if dead?
|
(if dead?
|
||||||
(alex:flatten ($:tokenize (cmd:$cmd "guix" "gc" "--list-dead")))
|
(alex:flatten ($:tokenize (cmd:$cmd "guix" "gc" "--list-dead")))
|
||||||
($:directory-listing "/gnu/store" :sort? t)))
|
(ambrevar/file:list-directory "/gnu/store" :sort)))
|
||||||
#'> :key #'second)))))
|
#'> :key #'second)))))
|
||||||
|
|
||||||
(export-always 'delete-store-items)
|
(export-always 'delete-store-items)
|
||||||
|
|
Loading…
Reference in New Issue