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

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

[nongnu] elpa/swift-mode 049c6d6 439/496: Use `assoc-default`


From: ELPA Syncer
Subject: [nongnu] elpa/swift-mode 049c6d6 439/496: Use `assoc-default`
Date: Sun, 29 Aug 2021 11:34:23 -0400 (EDT)

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

    Use `assoc-default`
---
 swift-mode-indent.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/swift-mode-indent.el b/swift-mode-indent.el
index e70c899..263f34b 100644
--- a/swift-mode-indent.el
+++ b/swift-mode-indent.el
@@ -1354,9 +1354,9 @@ Return the token skipped."
           (progn
             (backward-list)
             (swift-mode:token
-             (cdr (assoc previous-type '((} . {})
-                                         (\) . \(\))
-                                         (\] . \[\]))))
+             (assoc-default previous-type '((} . {})
+                                            (\) . \(\))
+                                            (\] . \[\])))
              (buffer-substring-no-properties (point) previous-end)
              (point)
              previous-end))
@@ -1394,9 +1394,9 @@ Return the token skipped."
           (progn
             (forward-list)
             (swift-mode:token
-             (cdr (assoc next-type '(({ . {})
-                                     (\( . \(\))
-                                     (\[ . \[\]))))
+             (assoc-default next-type '(({ . {})
+                                        (\( . \(\))
+                                        (\[ . \[\])))
              (buffer-substring-no-properties next-start (point))
              next-start
              (point)))



reply via email to

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