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

@ -192,9 +192,6 @@ packages."
(append-map transitive-inputs packages)))
;; TODO: Deduplicate these.
(define show-what-to-build*
(store-lift show-what-to-build))
(define set-build-options-from-command-line*
(store-lift set-build-options-from-command-line))