[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/corfu 4732ed7b96: Use derived-mode-p for corfu-exclude-
|
From: |
ELPA Syncer |
|
Subject: |
[elpa] externals/corfu 4732ed7b96: Use derived-mode-p for corfu-exclude-modes |
|
Date: |
Wed, 3 May 2023 18:57:30 -0400 (EDT) |
branch: externals/corfu
commit 4732ed7b965c56c645d3e74959e2a858950fd9e3
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Use derived-mode-p for corfu-exclude-modes
---
corfu.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/corfu.el b/corfu.el
index 51481b92dc..fc5bf8e556 100644
--- a/corfu.el
+++ b/corfu.el
@@ -126,7 +126,6 @@ separator: Only stay alive if there is no match and
(defcustom corfu-exclude-modes nil
"List of modes excluded by `global-corfu-mode'."
:type '(repeat symbol))
-(define-obsolete-function-alias 'corfu-excluded-modes 'corfu-exclude-modes
"0.35")
(defcustom corfu-left-margin-width 0.5
"Width of the left margin in units of the character width."
@@ -1288,7 +1287,7 @@ The ORIG function takes the FUN and WHICH arguments."
(unless (or noninteractive
buffer-read-only
(eq (aref (buffer-name) 0) ?\s)
- (memq major-mode corfu-exclude-modes))
+ (apply #'derived-mode-p corfu-exclude-modes))
(corfu-mode 1)))
(defun corfu--eldoc-advice ()
| [Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/corfu 4732ed7b96: Use derived-mode-p for corfu-exclude-modes,
ELPA Syncer <=