From 45275d3be36e9fe8c78b402ef64c926be152f6aa Mon Sep 17 00:00:00 2001 From: Yoni Rabkin Date: Fri, 20 Nov 2020 12:32:05 -0500 Subject: splitting aside code for viewer2 --- rt-liberation.el | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'rt-liberation.el') diff --git a/rt-liberation.el b/rt-liberation.el index ef3c84f..9fbcdf5 100644 --- a/rt-liberation.el +++ b/rt-liberation.el @@ -645,6 +645,14 @@ If POINT is nil then called on (point)." (let ((ticket-alist (get-text-property (point) 'rt-ticket))) (rt-liber-display-ticket-history ticket-alist (current-buffer)))) +;; remove after release START +(defun rt-liber-viewer2-display-ticket-at-point () + "Display the contents of the ticket at point." + (interactive) + (let ((ticket-alist (get-text-property (point) 'rt-ticket))) + (rt-liber-viewer2-display-ticket-history ticket-alist (current-buffer)))) +;; remove after release END + (defun rt-liber-browser-search (id) "Return point where ticket with ID is displayed or nil." (let ((p nil)) -- cgit v1.2.3