branch: externals/bluetooth
commit e95f30bce08ed8b611eb4a3e167bce595f10e70a
Author: Raffael Stocker <[email protected]>
Commit: Raffael Stocker <[email protected]>
avoid using undocumented value of ‘push’
* bluetooth.el (bluetooth--parse-class): use ‘cons’ instead of ‘push’ for
value accumulation
---
bluetooth.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/bluetooth.el b/bluetooth.el
index ab16c29..f8e485d 100644
--- a/bluetooth.el
+++ b/bluetooth.el
@@ -1449,7 +1449,7 @@ scanning the bus, displaying device info etc."
(let* ((m-field (lsh (logand class
.mask) .shift))
(res (cons .name
(list (funcall .fn m-field .data))))
- (n-acc (push res
acc)))
+ (n-acc (cons res
acc)))
(cond ((functionp .next)
(let ((spec
(funcall .next m-field .data)))
(if spec
