changeset 87238:ada1cfe623ac

Add declare-function compatibility definition. (widget-button-press, gnus-make-hashtable): Autoload. (widget-event-point, gnus-configure-windows): Declare as functions.
author Glenn Morris <rgm@gnu.org>
date Tue, 11 Dec 2007 05:28:59 +0000
parents 39e105c95381
children 4b1974470f60
files lisp/gnus/mml.el
diffstat 1 files changed, 10 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/mml.el	Tue Dec 11 05:28:13 2007 +0000
+++ b/lisp/gnus/mml.el	Tue Dec 11 05:28:59 2007 +0000
@@ -25,6 +25,10 @@
 
 ;;; Code:
 
+;; For Emacs < 22.2.
+(eval-and-compile
+  (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
+
 (require 'mm-util)
 (require 'mm-bodies)
 (require 'mm-encode)
@@ -1316,6 +1320,12 @@
 
 (defvar mml-preview-buffer nil)
 
+(autoload 'gnus-make-hashtable "gnus-util")
+(autoload 'widget-button-press "wid-edit" nil t)
+(declare-function widget-event-point "wid-edit" (event))
+;; If gnus-buffer-configuration is bound this is loaded.
+(declare-function gnus-configure-windows "gnus-win" (setting &optional force))
+
 (defun mml-preview (&optional raw)
   "Display current buffer with Gnus, in a new buffer.
 If RAW, display a raw encoded MIME message.