(gnus-expunge): Use defalias.

This commit is contained in:
Karl Heuer 1995-05-17 20:35:23 +00:00
parent 809a2f57c2
commit 73c017045a

View file

@ -5317,7 +5317,7 @@ Timezone package is used."
(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.