branch: elpa/consult-flycheck
commit e3fca5fadfa86cde5b1f2a5fc7c7669fb3423d15
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
Use if-let*
---
consult-flycheck.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/consult-flycheck.el b/consult-flycheck.el
index cb214196307..2f9dd949a02 100644
--- a/consult-flycheck.el
+++ b/consult-flycheck.el
@@ -47,10 +47,10 @@ In contrast to `flycheck-error-level-<' sort errors first."
(ly (flycheck-error-level y))
(sx (flycheck-error-level-severity lx))
(sy (flycheck-error-level-severity ly))
- (fx (if-let ((file (flycheck-error-filename x)))
+ (fx (if-let* ((file (flycheck-error-filename x)))
(file-name-nondirectory file)
(buffer-name (flycheck-error-buffer x))))
- (fy (if-let ((file (flycheck-error-filename y)))
+ (fy (if-let* ((file (flycheck-error-filename y)))
(file-name-nondirectory file)
(buffer-name (flycheck-error-buffer y)))))
(if (string= fx fy)
@@ -69,7 +69,7 @@ In contrast to `flycheck-error-level-<' sort errors first."
(let* ((errors (mapcar
(lambda (err)
(list
- (if-let (file (flycheck-error-filename err))
+ (if-let* ((file (flycheck-error-filename err)))
(file-name-nondirectory file)
(buffer-name (flycheck-error-buffer err)))
(number-to-string (flycheck-error-line err))
