build-self: Explain why we keep using deprecated bindings.

* build-aux/build-self.scm (build): Add comment regarding the deprecated
names.
This commit is contained in:
Ludovic Courtès 2019-04-23 16:39:00 +02:00
parent 86b8869fff
commit 04fa9c62d9
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -399,6 +399,9 @@ (define* (build source
(mlet %store-monad ((build (build-program source version guile-version
#:pull-version pull-version))
(system (if system (return system) (current-system)))
;; Note: Use the deprecated names here because the
;; caller might be Guix <= 0.16.0.
(port ((store-lift nix-server-socket)))
(major ((store-lift nix-server-major-version)))
(minor ((store-lift nix-server-minor-version))))