Mercurial > emacs
comparison lisp/net/newst-plainview.el @ 98692:51d93fabb7cf
newsticker: declare-function compatibility
| author | Ulf Jasper <ulf.jasper@web.de> |
|---|---|
| date | Mon, 13 Oct 2008 18:44:14 +0000 |
| parents | d2bcf235d764 |
| children | a9dc0e7c3f2b |
comparison
equal
deleted
inserted
replaced
| 98691:152cf98e1cc2 | 98692:51d93fabb7cf |
|---|---|
| 4 ;; Free Software Foundation, Inc. | 4 ;; Free Software Foundation, Inc. |
| 5 | 5 |
| 6 ;; Author: Ulf Jasper <ulf.jasper@web.de> | 6 ;; Author: Ulf Jasper <ulf.jasper@web.de> |
| 7 ;; Filename: newst-plainview.el | 7 ;; Filename: newst-plainview.el |
| 8 ;; URL: http://www.nongnu.org/newsticker | 8 ;; URL: http://www.nongnu.org/newsticker |
| 9 ;; Time-stamp: "15. Juni 2008, 09:41:55 (ulf)" | 9 ;; Time-stamp: "13. Oktober 2008, 20:34:21 (ulf)" |
| 10 | 10 |
| 11 ;; ====================================================================== | 11 ;; ====================================================================== |
| 12 | 12 |
| 13 ;; This file is part of GNU Emacs. | 13 ;; This file is part of GNU Emacs. |
| 14 | 14 |
| 593 (let ((feed (get-text-property (point) 'feed))) | 593 (let ((feed (get-text-property (point) 'feed))) |
| 594 (when feed | 594 (when feed |
| 595 (newsticker--debug-msg "Getting news for %s" (symbol-name feed)) | 595 (newsticker--debug-msg "Getting news for %s" (symbol-name feed)) |
| 596 (newsticker-get-news (symbol-name feed))))) | 596 (newsticker-get-news (symbol-name feed))))) |
| 597 | 597 |
| 598 (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))) | |
| 598 (declare-function w3m-toggle-inline-image "ext:w3m" (&optional force no-cache)) | 599 (declare-function w3m-toggle-inline-image "ext:w3m" (&optional force no-cache)) |
| 599 | 600 |
| 600 (defun newsticker-w3m-show-inline-images () | 601 (defun newsticker-w3m-show-inline-images () |
| 601 "Show inline images in visible text ranges. | 602 "Show inline images in visible text ranges. |
| 602 In-line images in invisible text ranges are hidden. This function | 603 In-line images in invisible text ranges are hidden. This function |