# HG changeset patch # User Glenn Morris # Date 1197350939 0 # Node ID ada1cfe623aca783c2419e637dd278524bf36439 # Parent 39e105c953815e678a511f8496a2bcd74bc9efb7 Add declare-function compatibility definition. (widget-button-press, gnus-make-hashtable): Autoload. (widget-event-point, gnus-configure-windows): Declare as functions. diff -r 39e105c95381 -r ada1cfe623ac lisp/gnus/mml.el --- 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.