mirror of
https://https.git.savannah.gnu.org/git/guix.git/
synced 2025-07-16 03:50:45 +02:00
ui: Deduplicate 'show-what-to-build*'.
* guix/ui.scm (show-what-to-build*): New procedure. * guix/scripts/environment.scm (show-what-to-build*): Delete. * guix/scripts/system.scm (show-what-to-build*): Likewise. * build-aux/make-binary-tarball.scm (show-what-to-build*): Likewise.
This commit is contained in:
parent
35481e8be6
commit
4d043ab628
4 changed files with 4 additions and 8 deletions
|
@ -27,9 +27,6 @@
|
|||
(gnu system install)
|
||||
(ice-9 match))
|
||||
|
||||
(define show-what-to-build*
|
||||
(store-lift show-what-to-build))
|
||||
|
||||
(define copy-file*
|
||||
(lift2 copy-file %store-monad))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue