Lines Matching +defs:exit +defs:minibuffer
467 (defcustom message-kill-buffer-on-exit nil
861 (defcustom message-minibuffer-local-map
862 (let ((map (make-sparse-keymap 'message-minibuffer-local-map)))
863 (set-keymap-parent map minibuffer-local-map)
865 "Keymap for `message-read-from-minibuffer'."
991 (defvar message-exit-actions nil
1056 'message-mail 'message-send-and-exit
1942 (read-from-minibuffer "New subject: ")))
1999 (read-from-minibuffer "Reason for No-Archive: "
2384 (define-key message-mode-map "\C-c\C-c" 'message-send-and-exit)
2434 ["Send Message" message-send-and-exit
2439 '(:help "File this draft message and exit"))]
2578 C-c C-s `message-send' (send the message) C-c C-c `message-send-and-exit'
2616 (set (make-local-variable 'message-exit-actions) nil)
3528 (defun message-send-and-exit (&optional arg)
3529 "Send message like `message-send', then, if no errors, exit from mail buffer."
3532 (actions message-exit-actions))
3535 (if message-kill-buffer-on-exit
3767 "Add ACTION to be performed when doing an exit of type TYPES."
3773 "Delete ACTION from lists of actions performed when doing an exit of type TYPES."
4049 (error "Sending...failed with exit value %d" cpr)))
5273 (read-from-minibuffer
6621 (list (message-read-from-minibuffer "Resend message to: ")))
6871 (message-send-and-exit "mail/send")
6893 (message-send-and-exit "gnus/mail_send")
7158 (defun message-read-from-minibuffer (prompt &optional initial-contents)
7159 "Read from the minibuffer while providing abbrev expansion."
7162 (minibuffer-setup-hook 'mail-abbrevs-setup)
7163 (minibuffer-local-map message-minibuffer-local-map))
7164 (read-from-minibuffer prompt initial-contents))
7165 (let ((minibuffer-setup-hook 'mail-abbrev-minibuffer-setup-hook)
7166 (minibuffer-local-map message-minibuffer-local-map))