# HG changeset patch # User Glenn Morris # Date 1213153874 0 # Node ID 83390f49235e4b1ad41c89e451a7dcc861605cc8 # Parent eb119cbc171571a3f9662d5e4fe407294d953f8d (declare-function): Add compat definition. (image-size): Declare. diff -r eb119cbc1715 -r 83390f49235e lisp/gnus/gnus-picon.el --- a/lisp/gnus/gnus-picon.el Wed Jun 11 03:10:59 2008 +0000 +++ b/lisp/gnus/gnus-picon.el Wed Jun 11 03:11:14 2008 +0000 @@ -38,6 +38,10 @@ ;; ;;; Code: +;; For Emacs < 22.2. +(eval-and-compile + (unless (fboundp 'declare-function) (defmacro declare-function (&rest r)))) + (eval-when-compile (require 'cl)) (require 'gnus) @@ -165,6 +169,8 @@ ;;; Functions that does picon transformations: +(declare-function image-size "image.c" (spec &optional pixels frame)) + (defun gnus-picon-transform-address (header category) (gnus-with-article-headers (let ((addresses