[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[PATCH 01/13] tests: Use 'dummy-origin' for lint tests when possible.
From: |
Mathieu Lirzin |
Subject: |
[PATCH 01/13] tests: Use 'dummy-origin' for lint tests when possible. |
Date: |
Sun, 24 Jan 2016 21:19:19 +0100 |
* 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.
---
tests/lint.scm | 12 +++---------
1 file changed, 3 insertions(+), 9 deletions(-)
diff --git a/tests/lint.scm b/tests/lint.scm
index b8dad13..54be50d 100644
--- a/tests/lint.scm
+++ b/tests/lint.scm
@@ -2,7 +2,7 @@
;;; Copyright © 2012, 2013 Cyril Roelandt <address@hidden>
;;; Copyright © 2014, 2015 Eric Bavier <address@hidden>
;;; Copyright © 2014, 2015, 2016 Ludovic Courtès <address@hidden>
-;;; Copyright © 2015 Mathieu Lirzin <address@hidden>
+;;; Copyright © 2015, 2016 Mathieu Lirzin <address@hidden>
;;;
;;; 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)))