summaryrefslogtreecommitdiff
path: root/rt-liberation.el
diff options
context:
space:
mode:
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