diff options
| author | Lars Ingebrigtsen | 2016-02-14 13:04:15 +1100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2016-02-14 13:04:25 +1100 |
| commit | 8e14ce4b5c88b9ec04d3a38ed2fcb8aa72b4c627 (patch) | |
| tree | 575907fc962bad640eecad29912096fdd680fce7 | |
| parent | cebd899370fb3b143ba640c3b6499e982e869849 (diff) | |
| download | emacs-8e14ce4b5c88b9ec04d3a38ed2fcb8aa72b4c627.tar.gz emacs-8e14ce4b5c88b9ec04d3a38ed2fcb8aa72b4c627.zip | |
Declare rfc1843 instead of autoloading
* lisp/gnus/gnus-art.el (rfc1843-decode-region): Declare
instead of autoload.
| -rw-r--r-- | lisp/gnus/gnus-art.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el index 317d2c83f0f..a2dc82e6ff7 100644 --- a/lisp/gnus/gnus-art.el +++ b/lisp/gnus/gnus-art.el | |||
| @@ -2671,11 +2671,12 @@ If READ-CHARSET, ask for a coding system." | |||
| 2671 | (point-min) (point-max) | 2671 | (point-min) (point-max) |
| 2672 | (mm-charset-to-coding-system charset nil t))))))) | 2672 | (mm-charset-to-coding-system charset nil t))))))) |
| 2673 | 2673 | ||
| 2674 | (autoload 'rfc1843-decode-region "rfc1843") | 2674 | (declare-function rfc1843-decode-region "rfc1843" (from to)) |
| 2675 | 2675 | ||
| 2676 | (defun article-decode-HZ () | 2676 | (defun article-decode-HZ () |
| 2677 | "Translate a HZ-encoded article." | 2677 | "Translate a HZ-encoded article." |
| 2678 | (interactive) | 2678 | (interactive) |
| 2679 | (require 'rfc1843) | ||
| 2679 | (save-excursion | 2680 | (save-excursion |
| 2680 | (let ((inhibit-read-only t)) | 2681 | (let ((inhibit-read-only t)) |
| 2681 | (rfc1843-decode-region (point-min) (point-max))))) | 2682 | (rfc1843-decode-region (point-min) (point-max))))) |