mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

Add declare-function compatibility definition.

Browse Source 
(widget-button-press, gnus-make-hashtable): Autoload.
(widget-event-point, gnus-configure-windows): Declare as functions.
This commit is contained in:
Glenn Morris 2007-12-11 05:28:59 +00:00
parent 0cc7b64209
commit 5ab56288c0
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/gnus/mml.el
View File

@ -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 @@ Should be adopted if code in `message-send-mail' is changed."
(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.