diff options
author | Ludovic Courtès <ludo@gnu.org> | 2016-01-03 14:53:03 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-01-03 14:53:03 +0100 |
commit | 53334dd6e9e296e17110ebcd2b1f93f117ffe36a (patch) | |
tree | 2653db2eab9a204dab892ea8b6812cadf7209e84 /guix/import/cran.scm | |
parent | 1575dcd134f4fae7255787293f4988bbd043de95 (diff) | |
parent | 51385362f76e2f823ac8d8cf720d06c386504069 (diff) | |
download | guix-patches-53334dd6e9e296e17110ebcd2b1f93f117ffe36a.tar guix-patches-53334dd6e9e296e17110ebcd2b1f93f117ffe36a.tar.gz |
Merge branch 'master' into core-updates
Diffstat (limited to 'guix/import/cran.scm')
-rw-r--r-- | guix/import/cran.scm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/guix/import/cran.scm b/guix/import/cran.scm index 845ecb5832..45c679cbe2 100644 --- a/guix/import/cran.scm +++ b/guix/import/cran.scm @@ -128,9 +128,12 @@ empty list when the FIELD cannot be found." #f "( *\\([^\\)]+\\)) *" value 'pre 'post) #\,))) - ;; When there is whitespace inside of items it is probably because - ;; this was not an actual list to begin with. - (remove (cut string-any char-set:whitespace <>) + (remove (lambda (item) + (or (string-null? item) + ;; When there is whitespace inside of items it is + ;; probably because this was not an actual list to + ;; begin with. + (string-any char-set:whitespace item))) (map string-trim-both items)))))) (define (beautify-description description) |