[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r102188: Silence shr.el compilation.
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r102188: Silence shr.el compilation. |
Date: |
Sun, 31 Oct 2010 19:19:17 -0700 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 102188
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Sun 2010-10-31 19:19:17 -0700
message:
Silence shr.el compilation.
* lisp/gnus/shr.el (declare-function): Add compat stub.
(url-cache-create-filename): Declare.
(mm-disable-multibyte, widget-convert-button): Autoload.
modified:
lisp/gnus/ChangeLog
lisp/gnus/shr.el
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog 2010-11-01 02:11:34 +0000
+++ b/lisp/gnus/ChangeLog 2010-11-01 02:19:17 +0000
@@ -1,5 +1,9 @@
2010-11-01 Glenn Morris <address@hidden>
+ * shr.el (declare-function): Add compat stub.
+ (url-cache-create-filename): Declare.
+ (mm-disable-multibyte, widget-convert-button): Autoload.
+
* smime.el (ldap-search): Declare.
(smime-cert-by-ldap-1): Require ldap on Emacs.
=== modified file 'lisp/gnus/shr.el'
--- a/lisp/gnus/shr.el 2010-10-31 22:31:24 +0000
+++ b/lisp/gnus/shr.el 2010-11-01 02:19:17 +0000
@@ -30,6 +30,10 @@
;;; Code:
+;; For Emacs <22.2 and XEmacs.
+(eval-and-compile
+ (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
+
(eval-when-compile (require 'cl))
(require 'browse-url)
(unless (aref (char-category-set (make-char 'japanese-jisx0208 33 35)) ?>)
@@ -411,6 +415,10 @@
image)))
image)))
+;; url-cache-extract autoloads url-cache.
+(declare-function url-cache-create-filename "url-cache" (url))
+(autoload 'mm-disable-multibyte "mm-util")
+
(defun shr-get-image-data (url)
"Get image data for URL.
Return a string with image data."
@@ -428,6 +436,8 @@
(apply #'shr-fontize-cont cont types)
(shr-ensure-paragraph))
+(autoload 'widget-convert-button "wid-edit")
+
(defun shr-urlify (start url)
(widget-convert-button
'url-link start (point)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r102188: Silence shr.el compilation.,
Glenn Morris <=