emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/swift-mode ba4d981 473/496: Use seq-contains-p if availabl


From: ELPA Syncer
Subject: [nongnu] elpa/swift-mode ba4d981 473/496: Use seq-contains-p if available
Date: Sun, 29 Aug 2021 11:34:30 -0400 (EDT)

branch: elpa/swift-mode
commit ba4d981035e40430e5d889955294e3a5d3c512fb
Author: taku0 <mxxouy6x3m_github@tatapa.org>
Commit: taku0 <mxxouy6x3m_github@tatapa.org>

    Use seq-contains-p if available
    
    Fix https://github.com/swift-emacs/swift-mode/pull/168.
    Thanks @jcs090218.
---
 swift-mode-imenu.el | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/swift-mode-imenu.el b/swift-mode-imenu.el
index 34f1b8c..c6de9a9 100644
--- a/swift-mode-imenu.el
+++ b/swift-mode-imenu.el
@@ -330,9 +330,13 @@ and \"c\".
          next-token
          parameter-end
          (parameter-names '())
-         (is-operator (seq-contains
-                       "/=-+!*%<>&|^~?."
-                       (elt (swift-mode:token:text name-token) 0))))
+         (seq-contains-p (if (fboundp 'seq-contains-p)
+                             'seq-contains-p
+                           'seq-contains))
+         (is-operator
+          (funcall seq-contains-p
+                   "/=-+!*%<>&|^~?."
+                   (elt (swift-mode:token:text name-token) 0))))
     (cond
      ((eq (swift-mode:token:type name-token) 'identifier)
       (while (progn



reply via email to

[Prev in Thread] Current Thread [Next in Thread]