summaryrefslogtreecommitdiff
path: root/rt-liberation.el
diff options
context:
space:
mode:
Diffstat (limited to 'rt-liberation.el')
-rw-r--r--rt-liberation.el35
1 files changed, 35 insertions, 0 deletions
diff --git a/rt-liberation.el b/rt-liberation.el
index f67c8ec..1b3ec5e 100644
--- a/rt-liberation.el
+++ b/rt-liberation.el
@@ -633,6 +633,28 @@ ASSOC-BROWSER if non-nil should be a ticket browser."
;; wrapper functions around specific functions provided by a backend
+(declare-function
+ rt-liber-gnus-compose-reply-to-requestor
+ "rt-liberation-gnus.el")
+(declare-function
+ rt-liber-gnus-compose-reply-to-requestor-to-this
+ "rt-liberation-gnus.el")
+(declare-function
+ rt-liber-gnus-compose-reply-to-requestor-verbatim-this
+ "rt-liberation-gnus.el")
+(declare-function
+ rt-liber-gnus-compose-provisional
+ "rt-liberation-gnus.el")
+(declare-function
+ rt-liber-gnus-compose-provisional-to-this
+ "rt-liberation-gnus.el")
+(declare-function
+ rt-liber-gnus-compose-comment
+ "rt-liberation-gnus.el")
+(declare-function
+ rt-liber-gnus-compose-comment-this
+ "rt-liberation-gnus.el")
+
(defun rt-liber-viewer-answer ()
"Answer the ticket."
(interactive)
@@ -687,6 +709,10 @@ ASSOC-BROWSER if non-nil should be a ticket browser."
;;; Ticket browser
;;; --------------------------------------------------------
+(declare-function
+ rt-liber-get-ancillary-text
+ "rt-liberation-storage.el")
+
;; accept a ticket-alist object and return an alist mapping ticket
;; properties to format characters for use in `rt-liber-format'.
(defun rt-liber-format-function (ticket-alist)
@@ -741,6 +767,9 @@ ASSOC-BROWSER if non-nil should be a ticket browser."
(newline)
(insert (rt-liber-format " %o <== %R" ticket)))
+(declare-function rt-liber-ticket-marked-p
+ "rt-liberation-multi.el")
+
(defun rt-liber-ticketlist-browser-redraw (ticketlist &optional query)
"Display TICKETLIST. Optionally display QUERY as well."
(erase-buffer)
@@ -1013,6 +1042,10 @@ string then that will be the name of the new buffer."
;;; Major mode definitions
;;; --------------------------------------------------------
+(declare-function
+ rt-liber-multi-flag-as-spam-and-delete
+ "rt-liberation-multi.el")
+
(defun rt-liber-multi-delete-spam ()
"Delete marked tickets as spam."
(interactive)
@@ -1107,6 +1140,8 @@ string then that will be the name of the new buffer."
(switch-to-buffer rt-liber-browser-buffer)
(setq buffer-read-only t))
+(declare-function rt-liber-set-ancillary-text "rt-liberation-storage.el")
+
(defun rt-liber-browser-ancillary-text ()
"Wrapper function around storage backend."
(interactive)