diff options
author | Mathieu Lirzin <mthl@gnu.org> | 2016-01-24 16:28:51 +0100 |
---|---|---|
committer | Mathieu Lirzin <mthl@gnu.org> | 2016-01-28 16:31:38 +0100 |
commit | 052d53df1f9a34fea43a29618b0bf165255bdadf (patch) | |
tree | d9740ebf2fdf5d4c3b0ff4a45aba2f0276b1c27c | |
parent | 03675cad537251edb9215cdb0688f63908305409 (diff) | |
download | guix-052d53df1f9a34fea43a29618b0bf165255bdadf.tar.gz |
tests: Use 'dummy-origin' for lint tests when possible.
* guix/tests/lint.scm ("patches: file names", "patches: not found"): Use 'dummy-origin'. 'sha256' field was wrongly set to a string instead of a bytevector.
-rw-r--r-- | tests/lint.scm | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/tests/lint.scm b/tests/lint.scm index b8dad13ceb..54be50d1c1 100644 --- a/tests/lint.scm +++ b/tests/lint.scm @@ -2,7 +2,7 @@ ;;; Copyright © 2012, 2013 Cyril Roelandt <tipecaml@gmail.com> ;;; Copyright © 2014, 2015 Eric Bavier <bavier@member.fsf.org> ;;; Copyright © 2014, 2015, 2016 Ludovic Courtès <ludo@gnu.org> -;;; Copyright © 2015 Mathieu Lirzin <mthl@openmailbox.org> +;;; Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ -308,10 +308,7 @@ requests." (with-warnings (let ((pkg (dummy-package "x" (source - (origin - (method url-fetch) - (uri "someurl") - (sha256 "somesha") + (dummy-origin (patches (list "/path/to/y.patch"))))))) (check-patch-file-names pkg))) "file names of patches should start with the package name"))) @@ -322,10 +319,7 @@ requests." (with-warnings (let ((pkg (dummy-package "x" (source - (origin - (method url-fetch) - (uri "someurl") - (sha256 "somesha") + (dummy-origin (patches (list (search-patch "this-patch-does-not-exist!")))))))) (check-patch-file-names pkg))) |