branch: elpa/php-mode
commit 69e9c16fda61c3aef9219bf55adadcbba62c0586
Author: USAMI Kenta <[email protected]>
Commit: USAMI Kenta <[email protected]>
Fix malformed when-let* again
---
lisp/php-project.el | 2 +-
lisp/php.el | 2 +-
2 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/php-project.el b/lisp/php-project.el
index caa16eb394..0b59e2ce09 100644
--- a/lisp/php-project.el
+++ b/lisp/php-project.el
@@ -267,7 +267,7 @@ Typically it is `pear', `drupal', `wordpress', `symfony2'
and `psr2'.")
This function is compatible with `project-find-functions'."
(let ((default-directory dir))
- (when-let* (root (php-project-get-root-dir))
+ (when-let* ((root (php-project-get-root-dir)))
(if (file-exists-p (expand-file-name ".git" root))
(cons 'vc root)
(cons 'transient root)))))
diff --git a/lisp/php.el b/lisp/php.el
index 437776c624..c08227b1f7 100644
--- a/lisp/php.el
+++ b/lisp/php.el
@@ -553,7 +553,7 @@ The order is reversed by calling as follows:
(c-backward-token-2 1 nil))
collect
(cond
- ((when-let* (bounds (php--thing-at-point-bounds-of-string-at-point))
+ ((when-let* ((bounds
(php--thing-at-point-bounds-of-string-at-point)))
(prog1 (buffer-substring-no-properties (car bounds) (cdr bounds))
(goto-char (car bounds)))))
((looking-at php-re-token-symbols)
