[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 73582ed6d4f: Use return values of assq-delete-all and assoc-delet
From: |
Mattias Engdegård |
Subject: |
master 73582ed6d4f: Use return values of assq-delete-all and assoc-delete-all |
Date: |
Wed, 24 May 2023 05:37:37 -0400 (EDT) |
branch: master
commit 73582ed6d4f227216d4c56c3f5f98c56e48796ca
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>
Use return values of assq-delete-all and assoc-delete-all
* lisp/allout-widgets.el (allout-widgets-mode):
* lisp/progmodes/eglot.el (eglot-handle-notification):
Update variables with the new value, which was probably the intention
here.
---
lisp/allout-widgets.el | 3 ++-
lisp/progmodes/eglot.el | 4 +++-
2 files changed, 5 insertions(+), 2 deletions(-)
diff --git a/lisp/allout-widgets.el b/lisp/allout-widgets.el
index 5e137b21fbb..be9cf06c523 100644
--- a/lisp/allout-widgets.el
+++ b/lisp/allout-widgets.el
@@ -613,7 +613,8 @@ outline hot-spot navigation (see `allout-mode')."
#'allout-widgets-post-command-business 'local)
(remove-hook 'pre-command-hook
#'allout-widgets-pre-command-business 'local)
- (assq-delete-all 'allout-widgets-mode-inhibit minor-mode-alist)
+ (setq minor-mode-alist
+ (assq-delete-all 'allout-widgets-mode-inhibit minor-mode-alist))
(set-buffer-modified-p was-modified))))
;;;_ > allout-widgets-mode-off
(defun allout-widgets-mode-off ()
diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index a65795f1dfc..8df2e52b0e7 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -2277,7 +2277,9 @@ still unanswered LSP requests to the server\n")))
(buffer (find-buffer-visiting path)))
(with-current-buffer buffer
(cl-loop
- initially (assoc-delete-all path flymake-list-only-diagnostics)
+ initially
+ (setq flymake-list-only-diagnostics
+ (assoc-delete-all path flymake-list-only-diagnostics))
for diag-spec across diagnostics
collect (eglot--dbind ((Diagnostic) range code message severity
source tags)
diag-spec
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 73582ed6d4f: Use return values of assq-delete-all and assoc-delete-all,
Mattias Engdegård <=