mirror of
git://git.savannah.gnu.org/guix.git
synced 2023-12-14 03:33:07 +01:00
0336372296
Build fails with emacs-next cause of copypasted test defined two times. * gnu/packages/patches/emacs-kv-fix-tests.patch: New file. * gnu/packages/emacs-xyz.scm (emacs-kv): Use it here. * gnu/local.mk (dist_patch_DATA): Register it here.
30 lines
893 B
Diff
30 lines
893 B
Diff
From 4702849bfe7462fb6c6303786dac1b670c8f0f8f Mon Sep 17 00:00:00 2001
|
|
From: Andrew Tropin <andrew@trop.in>
|
|
Date: Wed, 14 Sep 2022 09:17:31 +0300
|
|
Subject: [PATCH] remove copypasted kvaq test
|
|
|
|
---
|
|
kv-tests.el | 7 -------
|
|
1 file changed, 7 deletions(-)
|
|
|
|
diff --git a/kv-tests.el b/kv-tests.el
|
|
index 1713e5e..abd6a24 100644
|
|
--- a/kv-tests.el
|
|
+++ b/kv-tests.el
|
|
@@ -105,13 +105,6 @@
|
|
(should-not (equal "b" (kvaq "a" '((:a . :b)("a" . "b")))))
|
|
(should-not (kvaq "b" '((:a . :b)("a" . "b")))))
|
|
|
|
-(ert-deftest kvaq ()
|
|
- "Test the simple assq."
|
|
- (should (equal :b (kvaq :a '((:a . :b)("a" . "b")))))
|
|
- (should (equal 2 (kvaq 1 '((1 . 2)("a" . "b")))))
|
|
- (should-not (equal "b" (kvaq "a" '((:a . :b)("a" . "b")))))
|
|
- (should-not (kvaq "b" '((:a . :b)("a" . "b")))))
|
|
-
|
|
(ert-deftest kvaqc ()
|
|
"Test the simple assq."
|
|
(should (equal :b (kvaqc :a '((:a . :b)("a" . "b")))))
|
|
--
|
|
2.37.3
|
|
|