1
Fork 0
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:
David Thompson 2015-05-20 18:42:35 -04:00
parent 35481e8be6
commit 4d043ab628
4 changed files with 4 additions and 8 deletions

View file

@ -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))