# HG changeset patch # User Karl Heuer # Date 800742923 0 # Node ID 49c4d8910dfc26c3de625893dd98b680a18ae0e8 # Parent 3795b80ba1de8801128c45ff58a3566cc65aab05 (gnus-expunge): Use defalias. diff -r 3795b80ba1de -r 49c4d8910dfc lisp/=gnus.el --- a/lisp/=gnus.el Wed May 17 20:29:52 1995 +0000 +++ b/lisp/=gnus.el Wed May 17 20:35:23 1995 +0000 @@ -5317,7 +5317,7 @@ (progn (search-forward "\n\n" nil 'move) (point))) (mail-fetch-field field)))) -(fset 'gnus-expunge 'gnus-summary-delete-marked-with) +(defalias 'gnus-expunge 'gnus-summary-delete-marked-with) (defun gnus-kill (field regexp &optional command all) "If FIELD of an article matches REGEXP, execute COMMAND.