(rmail-output-menu): Function deleted.

1 files changed, 0 insertions, 11 deletions

diff --git a/lisp/mail/rmailout.el b/lisp/mail/rmailout.el
index 0f84583fe95..190c3dddff5 100644
--- a/lisp/mail/rmailout.el
+++ b/lisp/mail/rmailout.el
@@ -37,17 +37,6 @@ NAME-EXP may be a string constant giving the file name to use,
 or more generally it may be any kind of expression that returns
 a file name as a string.")
 
-(defun rmail-output-menu (event)
-  "Output current message to another Rmail file, chosen with a menu.
-Also set the default for subsequent \\[rmail-output-to-rmail-file] commands.
-The variables `rmail-secondary-file-directory' and
-`rmail-secondary-file-regexp' control which files are offered in the menu."
-  (interactive "e")
-  (let ((file-name (rmail-secondary-file-menu event)))
-    (if file-name
-        (rmail-output-to-rmail-file
-         (setq rmail-default-rmail-file file-name)))))
-
 ;;; There are functions elsewhere in Emacs that use this function; check
 ;;; them out before you change the calling method.
 (defun rmail-output-to-rmail-file (file-name &optional count)