diff options
| -rw-r--r-- | guix/scripts/import.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix/scripts/import.scm b/guix/scripts/import.scm index 11e94769bb..40fa6759ae 100644 --- a/guix/scripts/import.scm +++ b/guix/scripts/import.scm @@ -4,6 +4,7 @@ ;;; Copyright © 2018 Kyle Meyer <[email protected]> ;;; Copyright © 2019 Ricardo Wurmus <[email protected]> ;;; Copyright © 2021 Simon Tournier <[email protected]> +;;; Copyright © 2021 Xinglu Chen <[email protected]> ;;; ;;; This file is part of GNU Guix. ;;; @@ -118,7 +119,8 @@ Run IMPORTER with ARGS.\n")) (if (member importer importers) (let ((print (lambda (expr) (pretty-print expr (newline-rewriting-port - (current-output-port)))))) + (current-output-port)) + #:max-expr-width 80)))) (match (apply (resolve-importer importer) args) ((and expr (or ('package _ ...) ('let _ ...) |