From 75e62613b1db312d16206acccfcfd6d03020f010 Mon Sep 17 00:00:00 2001
From: Ralph Ronnquist <ralph.ronnquist@gmail.com>
Date: Tue, 18 Apr 2023 18:00:41 +1000
Subject: [PATCH] Moved char2hex to misc.lsp.

---
 lsp-dbus/lsp-dbus-connection.lsp | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/lsp-dbus/lsp-dbus-connection.lsp b/lsp-dbus/lsp-dbus-connection.lsp
index f09381b..73e9672 100644
--- a/lsp-dbus/lsp-dbus-connection.lsp
+++ b/lsp-dbus/lsp-dbus-connection.lsp
@@ -58,9 +58,6 @@
     (setf RESULT (read-message))
     (if PAT (regex PAT RESULT 0) RESULT)))
 
-(define (char2hex STR)
-  (join (map (curry format "%2x") (map char (explode STR)))))
-
 (constant
  'AUTHFMT "AUTH EXTERNAL %s\r\n"
  'AUTHACK "OK (\\S+)\r\n"
@@ -82,5 +79,4 @@
 (define (cancel)
   (handshake "CANCEL\r\n" "(.*)"))
 
-"DbusConnection"
-
+"lsp-dbus-connection.lsp"
-- 
2.39.2