mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-02 08:22:22 +00:00
Code Issues Releases Activity

Add declare-function compatibility definition.

Browse Source 
(w3-parse-buffer, gnus-group-make-rss-group): Declare as functions.
This commit is contained in:
Glenn Morris 2007-12-11 05:22:34 +00:00
parent 444f6b28fa
commit 0f7cbeb9ea
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/gnus/nnrss.el
View File

@ -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."