From 526ccf43899b92942903f9c36a90ffaa615ebd4f Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Mon, 7 Sep 2009 17:40:58 +0200 Subject: [PATCH] Clean up the require stuff in org-gnus.el --- lisp/org-gnus.el | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) diff --git a/lisp/org-gnus.el b/lisp/org-gnus.el index 0a92bc7a6..678b4cdc4 100644 --- a/lisp/org-gnus.el +++ b/lisp/org-gnus.el @@ -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)