diff options
| author | Glenn Morris | 2018-03-23 16:12:13 -0400 |
|---|---|---|
| committer | Glenn Morris | 2018-03-23 16:14:46 -0400 |
| commit | aa83340fd43bf70f8bc2159310e18c3d0a2182a2 (patch) | |
| tree | f9833d61af3c1fa3e1c6da63f303ee99de0ed7c8 | |
| parent | 901f13122f7d605b5610adeb778973a2e3e80907 (diff) | |
| download | emacs-aa83340fd43bf70f8bc2159310e18c3d0a2182a2.tar.gz emacs-aa83340fd43bf70f8bc2159310e18c3d0a2182a2.zip | |
* lisp/gnus/gnus-vm.el (vm-mode, vm-save-message):
Declare rather than autoload.
| -rw-r--r-- | lisp/gnus/gnus-vm.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/gnus/gnus-vm.el b/lisp/gnus/gnus-vm.el index f0c48db10d6..4b4152fd5d3 100644 --- a/lisp/gnus/gnus-vm.el +++ b/lisp/gnus/gnus-vm.el | |||
| @@ -37,9 +37,6 @@ | |||
| 37 | (eval-when-compile | 37 | (eval-when-compile |
| 38 | (require 'cl)) | 38 | (require 'cl)) |
| 39 | 39 | ||
| 40 | (autoload 'vm-mode "vm") | ||
| 41 | (autoload 'vm-save-message "vm") | ||
| 42 | |||
| 43 | (defvar gnus-vm-inhibit-window-system nil | 40 | (defvar gnus-vm-inhibit-window-system nil |
| 44 | "Inhibit loading `win-vm' if using a window-system. | 41 | "Inhibit loading `win-vm' if using a window-system. |
| 45 | Has to be set before gnus-vm is loaded.") | 42 | Has to be set before gnus-vm is loaded.") |
| @@ -49,6 +46,8 @@ Has to be set before gnus-vm is loaded.") | |||
| 49 | (when window-system | 46 | (when window-system |
| 50 | (require 'win-vm)))) | 47 | (require 'win-vm)))) |
| 51 | 48 | ||
| 49 | (declare-function vm-mode "ext:vm" (&optional read-only)) | ||
| 50 | |||
| 52 | (defun gnus-vm-make-folder (&optional buffer) | 51 | (defun gnus-vm-make-folder (&optional buffer) |
| 53 | (require 'vm) | 52 | (require 'vm) |
| 54 | (let ((article (or buffer (current-buffer))) | 53 | (let ((article (or buffer (current-buffer))) |
| @@ -81,6 +80,8 @@ save those articles instead." | |||
| 81 | (let ((gnus-default-article-saver 'gnus-summary-save-in-vm)) | 80 | (let ((gnus-default-article-saver 'gnus-summary-save-in-vm)) |
| 82 | (gnus-summary-save-article arg))) | 81 | (gnus-summary-save-article arg))) |
| 83 | 82 | ||
| 83 | (declare-function vm-save-message "ext:vm-save" (folder &optional count)) | ||
| 84 | |||
| 84 | (defun gnus-summary-save-in-vm (&optional folder) | 85 | (defun gnus-summary-save-in-vm (&optional folder) |
| 85 | (interactive) | 86 | (interactive) |
| 86 | (require 'vm) | 87 | (require 'vm) |