diff options
author | Ricardo Wurmus <[email protected]> | 2022-08-25 11:51:41 +0200 |
---|---|---|
committer | Ricardo Wurmus <[email protected]> | 2022-08-25 11:55:12 +0200 |
commit | b0c9f0324865a8bacd83c4c1db369209968e9f8a (patch) | |
tree | f8a765b9a803228b02eb40efef10157083f591c2 | |
parent | a901d8e0daabb9e766e42865c74908d3303293b9 (diff) |
import/utils: beautify-description: Add case for "Implements".
* guix/import/utils.scm (beautify-description): Add case to transform
sentences beginning with "Implements".
-rw-r--r-- | guix/import/utils.scm | 6 |
1 files changed, 5 insertions, 1 deletions
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 <[email protected]> ;;; Copyright © 2016 Jelle Licht <[email protected]> ;;; Copyright © 2016 David Craven <[email protected]> -;;; Copyright © 2017, 2019, 2020 Ricardo Wurmus <[email protected]> +;;; Copyright © 2017, 2019, 2020, 2022 Ricardo Wurmus <[email protected]> ;;; Copyright © 2018 Oleg Pykhalov <[email protected]> ;;; Copyright © 2019 Robert Vollmert <[email protected]> ;;; Copyright © 2020 Helio Machado <[email protected]> @@ -283,6 +283,10 @@ LENGTH characters." (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 |