diff --git a/elisp/chronometrist-key-values.el b/elisp/chronometrist-key-values.el
index 66e10a5..339fdd5 100644
--- a/elisp/chronometrist-key-values.el
+++ b/elisp/chronometrist-key-values.el
@@ -433,7 +433,8 @@ used in `chronometrist-before-out-functions'."
 Return t, to permit use in `chronometrist-before-out-functions'."
   (interactive)
   (let* ((backend (chronometrist-active-backend))
-         (presets (chronometrist-key-value-get-presets task))
+         (presets (--map (format "%S" it)
+                         (chronometrist-key-value-get-presets task)))
          (key-values
           (when chronometrist-key-value-use-database-history
             (cl-loop for plist in (chronometrist-to-list backend)
diff --git a/elisp/chronometrist-key-values.org b/elisp/chronometrist-key-values.org
index 389b02f..3a1d891 100644
--- a/elisp/chronometrist-key-values.org
+++ b/elisp/chronometrist-key-values.org
@@ -749,7 +749,8 @@ Return t, to permit use in `chronometrist-before-out-functions'."
 Return t, to permit use in `chronometrist-before-out-functions'."
   (interactive)
   (let* ((backend (chronometrist-active-backend))
-         (presets (chronometrist-key-value-get-presets task))
+         (presets (--map (format "%S" it)
+                         (chronometrist-key-value-get-presets task)))
          (key-values
           (when chronometrist-key-value-use-database-history
             (cl-loop for plist in (chronometrist-to-list backend)