|
@@ -36,6 +36,12 @@
|
|
|
(require 'org)
|
|
|
(eval-when-compile (require 'gnus-sum))
|
|
|
|
|
|
+;; Declare external functions and variables
|
|
|
+(declare-function message-fetch-field "message" (header &optional not-all))
|
|
|
+(declare-function message-narrow-to-head-1 "message" nil)
|
|
|
+;; The following line suppresses a compiler warning stemming from gnus-sum.el
|
|
|
+(declare-function gnus-summary-last-subject "gnus-sum" nil)
|
|
|
+
|
|
|
;; Customization variables
|
|
|
|
|
|
(when (fboundp 'defvaralias)
|
|
@@ -49,13 +55,6 @@ negates this setting for the duration of the command."
|
|
|
:group 'org-link-store
|
|
|
:type 'boolean)
|
|
|
|
|
|
-;; Declare external functions and variables
|
|
|
-(declare-function message-fetch-field "message" (header &optional not-all))
|
|
|
-(declare-function message-narrow-to-head-1 "message" nil)
|
|
|
-
|
|
|
-(defvar gnus-other-frame-object)
|
|
|
-(defvar gnus-group-name)
|
|
|
-(defvar gnus-article-current)
|
|
|
|
|
|
;; Install the link type
|
|
|
(org-add-link-type "gnus" 'org-gnus-open)
|