diff options
| author | Philip Kaludercic <philipk@posteo.net> | 2022-08-10 21:18:55 +0200 |
|---|---|---|
| committer | Philip Kaludercic <philipk@posteo.net> | 2022-08-10 21:18:55 +0200 |
| commit | 36bc169cc08408ae2cc2cfe0e2a3dc4338fc3b71 (patch) | |
| tree | c519e9048ba7d3c106053ced2e16a2788646d0fb | |
| parent | 46b44c3be1f650c9f7c56f8e5f70211a796fc977 (diff) | |
Avoid using when-let in provided-mode-derived-p
| -rw-r--r-- | compat-27.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compat-27.el b/compat-27.el index 99a1d33..bc0e37a 100644 --- a/compat-27.el +++ b/compat-27.el @@ -405,8 +405,8 @@ Uses the `derived-mode-parent' property of the symbol to trace backwards. If you just want to check `major-mode', use `derived-mode-p'." :realname compat--provided-mode-derived-p ;; If MODE is an alias, then look up the real mode function first. - (when-let ((alias (symbol-function mode))) - (when (symbolp alias) + (let ((alias (symbol-function mode))) + (when (and alias (symbolp alias)) (setq mode alias))) (while (and |