# HG changeset patch # User Glenn Morris # Date 1197350554 0 # Node ID 3b4311ae0926dd551e9bee4974745f1cd65d93dd # Parent e4e336c0677eff8477d75d3c805cca8439aca323 Add declare-function compatibility definition. (w3-parse-buffer, gnus-group-make-rss-group): Declare as functions. diff -r e4e336c0677e -r 3b4311ae0926 lisp/gnus/nnrss.el --- a/lisp/gnus/nnrss.el Tue Dec 11 05:22:04 2007 +0000 +++ b/lisp/gnus/nnrss.el Tue Dec 11 05:22:34 2007 +0000 @@ -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 @@ 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 @@ (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."