branch: elpa/swift-mode
commit ba4d981035e40430e5d889955294e3a5d3c512fb
Author: taku0 <mxxouy6x3m_git...@tatapa.org>
Commit: taku0 <mxxouy6x3m_git...@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