diff options
| author | Karl Heuer | 1995-05-17 20:35:23 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-05-17 20:35:23 +0000 |
| commit | 73c017045aeb8f666869cd15519f1249fff9812e (patch) | |
| tree | cefb92a9235092e8e2871176f5cb2c60054c6761 | |
| parent | 809a2f57c2e685ec6cf227a43c9e22637f3a3b5c (diff) | |
| download | emacs-73c017045aeb8f666869cd15519f1249fff9812e.tar.gz emacs-73c017045aeb8f666869cd15519f1249fff9812e.zip | |
(gnus-expunge): Use defalias.
| -rw-r--r-- | lisp/gnus.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus.el b/lisp/gnus.el index 847665da596..75381b02576 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el | |||
| @@ -5317,7 +5317,7 @@ Timezone package is used." | |||
| 5317 | (progn (search-forward "\n\n" nil 'move) (point))) | 5317 | (progn (search-forward "\n\n" nil 'move) (point))) |
| 5318 | (mail-fetch-field field)))) | 5318 | (mail-fetch-field field)))) |
| 5319 | 5319 | ||
| 5320 | (fset 'gnus-expunge 'gnus-summary-delete-marked-with) | 5320 | (defalias 'gnus-expunge 'gnus-summary-delete-marked-with) |
| 5321 | 5321 | ||
| 5322 | (defun gnus-kill (field regexp &optional command all) | 5322 | (defun gnus-kill (field regexp &optional command all) |
| 5323 | "If FIELD of an article matches REGEXP, execute COMMAND. | 5323 | "If FIELD of an article matches REGEXP, execute COMMAND. |