branch: elpa/bash-completion
commit 25611eed1e086c4e8cdd335dbd38b1d796be5b8d
Author: Stephane Zermatten <[email protected]>
Commit: Stephane Zermatten <[email protected]>
Remove use of when-let, which caused breakages in older versions.
---
bash-completion.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/bash-completion.el b/bash-completion.el
index cad451f28b..35a4dc6e3c 100644
--- a/bash-completion.el
+++ b/bash-completion.el
@@ -1267,9 +1267,10 @@ Returns the option as a list of strings."
(match-end 0) (point-max)))))
;; stop at the first newline token (not necessary the first
;; newline)
- (when-let ((end (member "\n" args)))
- (setcdr end nil)
- (setq args (butlast args)))
+ (let ((end (member "\n" args)))
+ (when end
+ (setcdr end nil)
+ (setq args (butlast args))))
;; remove the command name or the -D
(if (member "-D" args)
(delete "-D" args)
