From 22ee512632fe1ac3d24bf0ef6fad2c5235ee756d Mon Sep 17 00:00:00 2001
From: Kinneyzhang <zhangkai18@asiainfo.com>
Date: Thu, 18 Dec 2025 10:47:40 +0800
Subject: [PATCH] add define-tp && define-tp-group

---
 tp.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/tp.el b/tp.el
index a66d248..7b12013 100644
--- a/tp.el
+++ b/tp.el
@@ -1546,6 +1546,8 @@ The layer is stored in `tp-layer-alist'."
          (push (cons ',name ',properties) tp-layer-alist))
        (assoc ',name tp-layer-alist))))
 
+(defalias 'define-tp 'tp-define-layer)
+
 (defun tp--layer-group-element-format (element)
   "Determine the format type of ELEMENT.
 Returns 'symbol, 'format-1, 'format-2, 'format-3, or nil if invalid."
@@ -1660,6 +1662,8 @@ and the group itself is stored in `tp-layer-groups'."
          (push (cons ',name ',layer-names) tp-layer-groups))
        (assoc ',name tp-layer-groups))))
 
+(defalias 'define-tp-group 'tp-define-layer-group)
+
 (defun tp-layer-props (layer-name)
   "Return properties for layer LAYER-NAME from `tp-layer-alist'.
 Appends 'tp-name property to identify the layer."