This commit is contained in:
Kinneyzhang 2026-01-05 17:43:34 +08:00
parent 63b58c6cf5
commit ec1619e047

6
tp.el
View File

@ -968,8 +968,10 @@ NEW-OBJECT is the new string object (only different for strings with tp-text)."
((stringp tp-text-val)
;; Apply transform if layer has one registered
(let* ((layer-name (plist-get props 'tp-name))
(transform-fn (when layer-name (cdr (assoc layer-name tp-layer-transforms))))
(final-text (if transform-fn
(transform-fn (when layer-name
(cdr (assoc layer-name tp-layer-transforms))))
(final-text
(if transform-fn
(condition-case err
(funcall transform-fn tp-text-val)
(error