Mercurial > emacs
comparison lisp/url/url-vars.el @ 65559:02ea691fea58
(url-mail-command): Don't test fboundp of `compose-mail'.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 17 Sep 2005 04:59:02 +0000 |
| parents | 875dcc490074 |
| children | 0c55f53b51e6 2a679c81f552 |
comparison
equal
deleted
inserted
replaced
| 65558:b0580e2544c0 | 65559:02ea691fea58 |
|---|---|
| 172 :type '(repeat (cons :format "%v" | 172 :type '(repeat (cons :format "%v" |
| 173 (string :tag "Extension") | 173 (string :tag "Extension") |
| 174 (string :tag "Encoding"))) | 174 (string :tag "Encoding"))) |
| 175 :group 'url-mime) | 175 :group 'url-mime) |
| 176 | 176 |
| 177 (defcustom url-mail-command (if (fboundp 'compose-mail) | 177 (defcustom url-mail-command 'compose-mail |
| 178 'compose-mail | |
| 179 'url-mail) | |
| 180 "*This function will be called whenever url needs to send mail. | 178 "*This function will be called whenever url needs to send mail. |
| 181 It should enter a mail-mode-like buffer in the current window. | 179 It should enter a mail-mode-like buffer in the current window. |
| 182 The commands `mail-to' and `mail-subject' should still work in this | 180 The commands `mail-to' and `mail-subject' should still work in this |
| 183 buffer, and it should use `mail-header-separator' if possible." | 181 buffer, and it should use `mail-header-separator' if possible." |
| 184 :type 'function | 182 :type 'function |