diff options
author | David Craven <david@craven.ch> | 2016-09-22 11:35:13 +0200 |
---|---|---|
committer | David Craven <david@craven.ch> | 2016-09-28 13:17:15 +0200 |
commit | 11e296ef3092de1e5b659822d4dad4465abad34f (patch) | |
tree | 83e212847a966a3c31de2332ae88513cf3d9b60d /tests/import-utils.scm | |
parent | 59b2034787909cf7efa4e8d672a815b466d7d09d (diff) | |
download | patches-11e296ef3092de1e5b659822d4dad4465abad34f.tar patches-11e296ef3092de1e5b659822d4dad4465abad34f.tar.gz |
import: utils: Refactor license->symbol.
* guix/import/utils.scm (license->symbol): Work for all licenses.
* tests/import-utils.scm (license->symbol): Add test.
Diffstat (limited to 'tests/import-utils.scm')
-rw-r--r-- | tests/import-utils.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/import-utils.scm b/tests/import-utils.scm index 3b11875c4a..8d44b9e0e2 100644 --- a/tests/import-utils.scm +++ b/tests/import-utils.scm @@ -20,6 +20,7 @@ (define-module (test-import-utils) #:use-module (guix tests) #:use-module (guix import utils) + #:use-module ((guix licenses) #:prefix license:) #:use-module (srfi srfi-64)) (test-begin "import-utils") @@ -33,4 +34,8 @@ "This package provides a function to establish world peace" (beautify-description "A function to establish world peace")) +(test-equal "license->symbol" + 'license:lgpl2.0 + (license->symbol license:lgpl2.0)) + (test-end "import-utils") |