summaryrefslogtreecommitdiff
path: root/rt-liberation.el
diff options
context:
space:
mode:
authorYoni Rabkin <yoni@rabkins.net>2021-02-17 11:15:45 -0500
committerYoni Rabkin <yoni@rabkins.net>2021-02-17 11:15:45 -0500
commit519184e7e7816f775c47d86ba1fdf2e8c7afea91 (patch)
tree897055a3cc38b5a3651a9643631f47f5908de8ee /rt-liberation.el
parenteb21239bc048090c2e3603e1645608dfe8317c43 (diff)
* rt-liberation.el: new function `rt-liber-display-ticket'
Diffstat (limited to 'rt-liberation.el')
-rw-r--r--rt-liberation.el9
1 files changed, 9 insertions, 0 deletions
diff --git a/rt-liberation.el b/rt-liberation.el
index 4ea72d1..40c11cc 100644
--- a/rt-liberation.el
+++ b/rt-liberation.el
@@ -493,6 +493,15 @@ AFTER date after predicate."
(error "null field symbol"))
(cdr (assoc field-symbol rt-liber-field-dictionary)))
+(defun rt-liber-display-ticket (ticket-number)
+ "Display ticket with TICKET-NUMBER."
+ (interactive "nticket number: ")
+ (let ((ticket-id (number-to-string ticket-number)))
+ (rt-liber-browse-query
+ (rt-liber-compile-query
+ (id ticket-id))
+ (concat "#" ticket-id))))
+
;;; --------------------------------------------------------
;;; Ticket browser