diff --git a/site-lisp/db-utils.el b/site-lisp/db-utils.el
index d13ea2d..edaf057 100644
--- a/site-lisp/db-utils.el
+++ b/site-lisp/db-utils.el
@@ -182,8 +182,7 @@ major mode MODE."
 (defun db/ascii-to-hex (ascii-string)
   "Convert ASCII-STRING to its hexadecimal representation."
   (interactive "sString (ascii): ")
-  (->> (string-to-list ascii-string)    ; redundant
-       (--map (format "%2X" it))
+  (->> (--map (format "%2X" it) ascii-string)
        (apply #'concat)
        message))