From: Glenn Morris <rgm@gnu.org>
Date: Tue, 11 Dec 2007 05:22:34 +0000 (+0000)
Subject: Add declare-function compatibility definition.
X-Git-Tag: emacs-pretest-23.0.90~8971
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0f7cbeb9eafceb644cf51b7e5aa073751b4b96e0;p=emacs.git

Add declare-function compatibility definition.
(w3-parse-buffer, gnus-group-make-rss-group): Declare as functions.
---

diff --git a/lisp/gnus/nnrss.el b/lisp/gnus/nnrss.el
index f72166b0455..4a02690a3c5 100644
--- a/lisp/gnus/nnrss.el
+++ b/lisp/gnus/nnrss.el
@@ -27,6 +27,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)
@@ -418,6 +422,8 @@ otherwise return nil."
 					 nnrss-compatible-encoding-alist)))))
     (mm-coding-system-p 'utf-8)))
 
+(declare-function w3-parse-buffer "ext:w3-parse" (&optional buff))
+
 (defun nnrss-fetch (url &optional local)
   "Fetch URL and put it in a the expected Lisp structure."
   (mm-with-unibyte-buffer
@@ -784,6 +790,8 @@ which RSS 2.0 allows."
 	  (push (list group nnrss-group-max) nnrss-server-data)))
       (nnrss-save-server-data server))))
 
+(declare-function gnus-group-make-rss-group "gnus-group" (&optional url))
+
 (defun nnrss-opml-import (opml-file)
   "OPML subscriptions import.
 Read the file and attempt to subscribe to each Feed in the file."