branch: externals/php-fill
commit 1fcf9433e8917d5516486ed69c9708b9aa9eb619
Author: Ariel Del Valle Lozano <[email protected]>
Commit: Ariel Del Valle Lozano <[email protected]>
Change let with let* for a better refactoring
---
php-fill.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/php-fill.el b/php-fill.el
index 5c9d957ede..b02285dfe6 100644
--- a/php-fill.el
+++ b/php-fill.el
@@ -76,8 +76,8 @@ on C or C++ style comments or both. See command
Optional argument ONLY-ONE-LINE-UP will be passed down to
`php-fill-string-literal'."
(interactive)
- (let ((php-fill-literal (php-fill-get-literal)) literal-limits)
- (setq literal-limits (car php-fill-literal))
+ (let* ((php-fill-literal (php-fill-get-literal))
+ (literal-limits (car php-fill-literal)))
(if (or (not literal-limits) (equal literal-limits 'string))
(php-fill-string-literal only-one-line-up)
(call-interactively 'php-fill-c-fill-paragraph))))
@@ -297,8 +297,8 @@ include, but are not limited to the lines length and
possible
concatenation with other supported string literals."
(save-restriction
(widen)
- (let ((literal (php-fill-get-literal)) literal-type literal-limits)
- (setq literal-type (car literal) literal-limits (cdr literal))
+ (let* ((literal (php-fill-get-literal)) (literal-type (car literal))
+ (literal-limits (cdr literal)))
(and (not (memq literal-type '(c c++ pound)))
(or (not literal-type)
;; At this point, ‘literal-type’ value would have to be
@@ -715,8 +715,8 @@ into two paragraphs separated by and empty line."
(interactive)
(save-restriction
(widen)
- (let ((literal (php-fill-get-literal)) literal-type literal-limits)
- (setq literal-type (car literal) literal-limits (cdr literal))
+ (let* ((literal (php-fill-get-literal)) (literal-type (car literal))
+ (literal-limits (cdr literal)))
(cond
((and (equal literal-type 'string)
(php-fill-lit-limits-are-in-the-same-line literal-limits)
