[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/xr 5394d8c 1/3: Simplify condition
From: |
Mattias Engdegård |
Subject: |
[elpa] externals/xr 5394d8c 1/3: Simplify condition |
Date: |
Mon, 9 Mar 2020 11:54:35 -0400 (EDT) |
branch: externals/xr
commit 5394d8c22bc37e332043a29f32614a1b496b4524
Author: Mattias Engdegård <address@hidden>
Commit: Mattias Engdegård <address@hidden>
Simplify condition
---
xr.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/xr.el b/xr.el
index 772605e..c8bd6d2 100644
--- a/xr.el
+++ b/xr.el
@@ -1151,8 +1151,7 @@ A-SETS and B-SETS are arguments to `any'."
(push seq alternatives)))
(if (cdr alternatives)
;; Simplify (or nonl "\n") to anything
- (if (or (equal alternatives '(nonl "\n"))
- (equal alternatives '("\n" nonl)))
+ (if (member alternatives '((nonl "\n") ("\n" nonl)))
'anything
(cons 'or (nreverse alternatives)))
(car alternatives))))