branch: externals/bluetooth
commit 28e9eb20bb4d79e95187530bbe30efd48fc7a4cb
Author: Raffael Stocker <r.stoc...@mnet-mail.de>
Commit: Raffael Stocker <r.stoc...@mnet-mail.de>
wraps @body in progn in bluetooth--maybe-cancel-reject
---
bluetooth.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/bluetooth.el b/bluetooth.el
index 5e5347a..8e2bb4f 100644
--- a/bluetooth.el
+++ b/bluetooth.el
@@ -408,7 +408,7 @@ This function only uses the first adapter reported by
Bluez."
`org.bluez.Error.Rejected' is issued if BODY evaluates to nil."
(declare (indent defun))
`(or (condition-case nil
- ,@body
+ (progn ,@body)
(quit (signal 'dbus-error '("org.bluez.Error.Canceled"))))
(signal 'dbus-error '("org.bluez.Error.Rejected"))))
