From 17abdd47835413e73cddfe1ace7bd644324316f5 Mon Sep 17 00:00:00 2001 From: Ulf Jasper Date: Mon, 13 Oct 2008 18:44:14 +0000 Subject: [PATCH] newsticker: declare-function compatibility --- lisp/ChangeLog | 8 ++++++++ lisp/net/newst-plainview.el | 3 ++- lisp/net/newst-treeview.el | 3 ++- 3 files changed, 12 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ac1f8bd14dd..0e32539c85a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,11 @@ +2008-10-13 Ulf Jasper + + * net/newst-plainview.el (w3m-toggle-inline-image): Define + 'declare-function if necessary, for compatibility. + + * net/newst-treeview.el (w3m-toggle-inline-images): Define + 'declare-function if necessary, for compatibility. + 2008-10-13 Alan Mackenzie * progmodes/cc-cmds.el (c-indent-region): (c-indent-region): Fix diff --git a/lisp/net/newst-plainview.el b/lisp/net/newst-plainview.el index 49bae4fae65..b85de50edd8 100644 --- a/lisp/net/newst-plainview.el +++ b/lisp/net/newst-plainview.el @@ -6,7 +6,7 @@ ;; Author: Ulf Jasper ;; Filename: newst-plainview.el ;; URL: http://www.nongnu.org/newsticker -;; Time-stamp: "15. Juni 2008, 09:41:55 (ulf)" +;; Time-stamp: "13. Oktober 2008, 20:34:21 (ulf)" ;; ====================================================================== @@ -595,6 +595,7 @@ This does NOT start the retrieval timers." (newsticker--debug-msg "Getting news for %s" (symbol-name feed)) (newsticker-get-news (symbol-name feed))))) +(unless (fboundp 'declare-function) (defmacro declare-function (&rest r))) (declare-function w3m-toggle-inline-image "ext:w3m" (&optional force no-cache)) (defun newsticker-w3m-show-inline-images () diff --git a/lisp/net/newst-treeview.el b/lisp/net/newst-treeview.el index 3edcf0693ee..4fd886e1d44 100644 --- a/lisp/net/newst-treeview.el +++ b/lisp/net/newst-treeview.el @@ -7,7 +7,7 @@ ;; URL: http://www.nongnu.org/newsticker ;; Created: 2007 ;; Keywords: News, RSS, Atom -;; Time-stamp: "11. Oktober 2008, 16:29:36 (ulf)" +;; Time-stamp: "13. Oktober 2008, 20:34:41 (ulf)" ;; ====================================================================== @@ -263,6 +263,7 @@ their id stays constant." ;; ====================================================================== +(unless (fboundp 'declare-function) (defmacro declare-function (&rest r))) (declare-function w3m-toggle-inline-images "ext:w3m" (&optional force no-cache)) (defun newsticker--treeview-render-text (start end) -- 2.39.5