diff --git a/org/config/stumpwm.org b/org/config/stumpwm.org
index 325fa5a..f4d686f 100644
--- a/org/config/stumpwm.org
+++ b/org/config/stumpwm.org
@@ -1772,7 +1772,7 @@ then attempt to connect to it.
            (choice  (cdr (stumpwm:select-from-menu
                           (stumpwm:current-screen)
                           (mapcar (lambda (device)
-                                    `(,(bluetooth-device-full-name device) . ,device))
+                                    `(,(bluetooth-device-full-name device) ,device))
                                   devices)))))
       (bluetooth-connect-device choice)))))
 #+end_src