ui: Disable Guile deprecation warnings by default.

* guix/ui.scm (initialize-guix): Call (debug-disable 'warn-deprecated)
when "GUILE_WARN_DEPRECATED" is not set.
This commit is contained in:
Ludovic Courtès 2017-05-16 14:31:37 +02:00
parent 5a3429bcc5
commit ce92d269fe
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5

@ -302,6 +302,13 @@ exiting. ARGS is the list of arguments received by the 'throw' handler."
(define (initialize-guix)
"Perform the usual initialization for stand-alone Guix commands."
;; By default don't annoy users with deprecation warnings. In practice,
;; 'define-deprecated' in (ice-9 deprecated) arranges so that those warnings
;; are emitted at expansion-time only, but there are cases where they could
;; slip through, for instance when interpreting code.
(unless (getenv "GUILE_WARN_DEPRECATED")
(debug-disable 'warn-deprecated))
(install-locale)
(textdomain %gettext-domain)