Mercurial > emacs
changeset 87230:3b4311ae0926
Add declare-function compatibility definition.
(w3-parse-buffer, gnus-group-make-rss-group): Declare as functions.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Tue, 11 Dec 2007 05:22:34 +0000 |
parents | e4e336c0677e |
children | f77f4c589557 |
files | lisp/gnus/nnrss.el |
diffstat | 1 files changed, 8 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- 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."