summary refs log tree commit diff
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2022-08-25 11:51:41 +0200
committerRicardo Wurmus <rekado@elephly.net>2022-08-25 11:55:12 +0200
commitb0c9f0324865a8bacd83c4c1db369209968e9f8a (patch)
treef8a765b9a803228b02eb40efef10157083f591c2
parenta901d8e0daabb9e766e42865c74908d3303293b9 (diff)
downloadguix-b0c9f0324865a8bacd83c4c1db369209968e9f8a.tar.gz
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.scm6
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 <ludo@gnu.org>
 ;;; Copyright © 2016 Jelle Licht <jlicht@fsfe.org>
 ;;; Copyright © 2016 David Craven <david@craven.ch>
-;;; Copyright © 2017, 2019, 2020 Ricardo Wurmus <rekado@elephly.net>
+;;; Copyright © 2017, 2019, 2020, 2022 Ricardo Wurmus <rekado@elephly.net>
 ;;; Copyright © 2018 Oleg Pykhalov <go.wigust@gmail.com>
 ;;; Copyright © 2019 Robert Vollmert <rob@vllmrt.net>
 ;;; Copyright © 2020 Helio Machado <0x2b3bfa0+guix@googlemail.com>
@@ -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