diff --git a/guix/import/utils.scm b/guix/import/utils.scm index 668b8c8083..7e7d116d1d 100644 --- a/guix/import/utils.scm +++ b/guix/import/utils.scm @@ -2,7 +2,7 @@ ;;; Copyright © 2012, 2013, 2018, 2019, 2020 Ludovic Courtès ;;; Copyright © 2016 Jelle Licht ;;; Copyright © 2016 David Craven -;;; Copyright © 2017, 2019, 2020 Ricardo Wurmus +;;; Copyright © 2017, 2019, 2020, 2022 Ricardo Wurmus ;;; Copyright © 2018 Oleg Pykhalov ;;; Copyright © 2019 Robert Vollmert ;;; Copyright © 2020 Helio Machado <0x2b3bfa0+guix@googlemail.com> @@ -283,6 +283,10 @@ (define* (beautify-description description #:optional (length 80)) (string-append "This package provides" (substring description (string-length "Provides")))) + ((string-prefix? "Implements " description) + (string-append "This package implements" + (substring description + (string-length "Implements")))) ((string-prefix? "Functions " description) (string-append "This package provides functions" (substring description