[elpa] externals/bluetooth 9ea7bad: requires 'subr-x (for when-let) and fixes a defun definition issue

[Stefan Monnier]

branch: externals/bluetooth
commit 9ea7bad3e159bbb4608c38139bf1b9c33d7d4c56
Author: Raffael Stocker <address@hidden>
Commit: Raffael Stocker <address@hidden>

    requires 'subr-x (for when-let) and fixes a defun definition issue
---
 bluetooth.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/bluetooth.el b/bluetooth.el
index a581323..0c47a44 100644
--- a/bluetooth.el
+++ b/bluetooth.el
@@ -5,7 +5,7 @@
 ;; Author: Raffael Stocker <address@hidden>
 ;; Maintainer: Raffael Stocker <address@hidden>
 ;; Created: 13 Aug 2019
-;; Version: 0.1.1
+;; Version: 0.1.2
 ;; Package-Requires: ((emacs "25.1") (dash "2.12.0"))
 ;; Keywords: hardware
 ;; URL: https://gitlab.com/rstocker/emacs-bluetooth
@@ -43,6 +43,7 @@
 (require 'let-alist)
 (require 'dash)
 (require 'rx)
+(eval-when-compile (require 'subr-x))
 
 (defgroup bluetooth nil
   "Bluetooth device management."
@@ -122,7 +123,7 @@ This is usually `:system' if bluetoothd runs as a system 
service, or
 ;;; This variable holds the device information as obtained from D-Bus.
 (defvar bluetooth--device-info nil "Device info obtained from Bluez.")
 
-(eval-when-compile
+(eval-and-compile
   (defun bluetooth--function-name (name &optional prefix)
     "Make a function name out of NAME and PREFIX.
 The generated function name has the form `bluetoothPREFIX-NAME'."