diff --git a/guix/build/gnu-build-system.scm b/guix/build/gnu-build-system.scm index 5ac6b4d43a..5ae537150f 100644 --- a/guix/build/gnu-build-system.scm +++ b/guix/build/gnu-build-system.scm @@ -22,7 +22,6 @@ #:use-module (ice-9 match) #:use-module (ice-9 regex) #:use-module (ice-9 format) - #:use-module (ice-9 iconv) #:use-module (srfi srfi-1) #:use-module (srfi srfi-26) #:export (%standard-phases @@ -500,11 +499,8 @@ in order. Return #t if all the PHASES succeeded, #f otherwise." (setvbuf (current-output-port) _IOLBF) (setvbuf (current-error-port) _IOLBF) - ;; Encoding/decoding errors shouldn't be silent. But our bootstrap Guile - ;; currently doesn't have access to iconv modules, so we have to allow it to - ;; be sloppier (XXX). - (when (false-if-exception (string->bytevector "works?" "ISO-8859-1")) - (fluid-set! %default-port-conversion-strategy 'error)) + ;; Encoding/decoding errors shouldn't be silent. + (fluid-set! %default-port-conversion-strategy 'error) ;; The trick is to #:allow-other-keys everywhere, so that each procedure in ;; PHASES can pick the keyword arguments it's interested in.