branch: externals/javaimp
commit aff94732239605311ee84b788ca04818a22f94ca
Author: Filipp Gunbin <[email protected]>
Commit: Filipp Gunbin <[email protected]>
Use _ in if-let* / when-let*
---
javaimp-parse.el | 6 +++---
javaimp.el | 10 +++++-----
2 files changed, 8 insertions(+), 8 deletions(-)
diff --git a/javaimp-parse.el b/javaimp-parse.el
index 9ff86024fd..19e14f4f74 100644
--- a/javaimp-parse.el
+++ b/javaimp-parse.el
@@ -681,9 +681,9 @@ call this function first."
(while t
(when-let* ((res (save-excursion
(javaimp-parse--scopes nil)))
- ((javaimp-scope-type res))
- ((or (null pred)
- (funcall pred res))))
+ (_ (javaimp-scope-type res))
+ (_ (or (null pred)
+ (funcall pred res))))
(throw 'found res))
;; Go up
(if (nth 1 state)
diff --git a/javaimp.el b/javaimp.el
index f5d6af1832..c96cf87705 100644
--- a/javaimp.el
+++ b/javaimp.el
@@ -1125,13 +1125,13 @@ than BOUND. POS should not be in arglist or similar
list."
;; open-brace, so we can inspect property.
(when-let* ((brace-pos
(next-single-property-change (point) 'javaimp-parse-scope))
- ((get-text-property brace-pos 'javaimp-parse-scope))
+ (_ (get-text-property brace-pos 'javaimp-parse-scope))
;; When there're no siblings, javaimp-beginning-of-defun
;; moves to the parent start. In this case we should
;; stay inside the parent.
- ((eql (nth 1 (syntax-ppss))
- (save-excursion
- (nth 1 (syntax-ppss brace-pos))))))
+ (_ (eql (nth 1 (syntax-ppss))
+ (save-excursion
+ (nth 1 (syntax-ppss brace-pos))))))
(ignore-errors
(goto-char
(scan-lists brace-pos 1 0)))))
@@ -1214,7 +1214,7 @@ PREV-INDEX gives the index of the method itself."
(setq tmp (nth 1 (syntax-ppss tmp))))
(when tmp
(javaimp--beg-of-defun-decl tmp parent-beg))))
- ((= next-beg-decl beg-decl)))
+ (_ (= next-beg-decl beg-decl)))
;; If we're inside next's declaration - behave as if we were
;; inside its body, so it becomes our prev
next
