[elpa] externals/which-key d5a4273 35/51: Replace use of xor

[Stefan Monnier]

branch: externals/which-key
commit d5a42732a6f39bb4284f378a6996aacecf888dc0
Author: Justin Burkett <justin@burkett.cc>
Commit: Justin Burkett <justin@burkett.cc>

    Replace use of xor
    
    Apparently this is a recent function
---
 which-key.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/which-key.el b/which-key.el
index f7bab55..e0b30de 100644
--- a/which-key.el
+++ b/which-key.el
@@ -1329,7 +1329,7 @@ width) in lines and characters respectively."
      ((not which-key-sort-uppercase-first)
       (let ((aup (not (string-equal da a)))
             (bup (not (string-equal db b))))
-        (if (not (xor aup bup))
+        (if (or (and aup bup) (and (not aup) (not bup)))
             (string-lessp a b)
           bup)))
      (t (string-lessp a b)))))