diff options
| author | Glenn Morris | 2008-06-11 03:10:20 +0000 |
|---|---|---|
| committer | Glenn Morris | 2008-06-11 03:10:20 +0000 |
| commit | dbb6c370b1ff6494e2ef6eaeeb2c7ee6f0ef07a3 (patch) | |
| tree | 97690d59ffed82c1ddd461b1c72fc12c9e0478b5 | |
| parent | ac14560041e252bd6b1205e8c8dc751394c90bea (diff) | |
| download | emacs-dbb6c370b1ff6494e2ef6eaeeb2c7ee6f0ef07a3.tar.gz emacs-dbb6c370b1ff6494e2ef6eaeeb2c7ee6f0ef07a3.zip | |
(x-focus-frame): Declare.
Remove unnecessary eval-and-compile of autoloads.
| -rw-r--r-- | lisp/gnus/gnus-util.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el index bef74579406..110e2e038d1 100644 --- a/lisp/gnus/gnus-util.el +++ b/lisp/gnus/gnus-util.el | |||
| @@ -50,14 +50,13 @@ | |||
| 50 | (require 'time-date) | 50 | (require 'time-date) |
| 51 | (require 'netrc) | 51 | (require 'netrc) |
| 52 | 52 | ||
| 53 | (eval-and-compile | 53 | (autoload 'message-fetch-field "message") |
| 54 | (autoload 'message-fetch-field "message") | 54 | (autoload 'gnus-get-buffer-window "gnus-win") |
| 55 | (autoload 'gnus-get-buffer-window "gnus-win") | 55 | (autoload 'rmail-insert-rmail-file-header "rmail") |
| 56 | (autoload 'rmail-insert-rmail-file-header "rmail") | 56 | (autoload 'rmail-count-new-messages "rmail") |
| 57 | (autoload 'rmail-count-new-messages "rmail") | 57 | (autoload 'rmail-show-message "rmail") |
| 58 | (autoload 'rmail-show-message "rmail") | 58 | (autoload 'nnheader-narrow-to-headers "nnheader") |
| 59 | (autoload 'nnheader-narrow-to-headers "nnheader") | 59 | (autoload 'nnheader-replace-chars-in-string "nnheader") |
| 60 | (autoload 'nnheader-replace-chars-in-string "nnheader")) | ||
| 61 | 60 | ||
| 62 | (eval-and-compile | 61 | (eval-and-compile |
| 63 | (cond | 62 | (cond |
| @@ -1592,6 +1591,7 @@ CHOICE is a list of the choice char and help message at IDX." | |||
| 1592 | (kill-buffer buf)) | 1591 | (kill-buffer buf)) |
| 1593 | tchar)) | 1592 | tchar)) |
| 1594 | 1593 | ||
| 1594 | (declare-function x-focus-frame "xfns.c" (frame)) | ||
| 1595 | (declare-function w32-focus-frame "../term/w32-win" (frame)) | 1595 | (declare-function w32-focus-frame "../term/w32-win" (frame)) |
| 1596 | 1596 | ||
| 1597 | (defun gnus-select-frame-set-input-focus (frame) | 1597 | (defun gnus-select-frame-set-input-focus (frame) |