mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-06 03:40:56 -08:00
Make rfc2368 obsolete and add rfc6068
* lisp/obsolete/rfc2368.el: Moved here and made obsolete. * lisp/mail/rfc6068.el (rfc6068-unhexify-string): New file.
This commit is contained in:
parent
31226b0341
commit
7dabcb1511
6 changed files with 138 additions and 2 deletions
|
|
@ -1603,7 +1603,7 @@ used instead of `browse-url-new-window-flag'."
|
|||
|
||||
;; --- mailto ---
|
||||
|
||||
(autoload 'rfc2368-parse-mailto-url "rfc2368")
|
||||
(autoload 'rfc6068-parse-mailto-url "rfc2368")
|
||||
|
||||
;;;###autoload
|
||||
(defun browse-url-mail (url &optional new-window)
|
||||
|
|
@ -1622,7 +1622,7 @@ When called non-interactively, optional second argument NEW-WINDOW is
|
|||
used instead of `browse-url-new-window-flag'."
|
||||
(interactive (browse-url-interactive-arg "Mailto URL: "))
|
||||
(save-excursion
|
||||
(let* ((alist (rfc2368-parse-mailto-url url))
|
||||
(let* ((alist (rfc6068-parse-mailto-url url))
|
||||
(to (assoc "To" alist))
|
||||
(subject (assoc "Subject" alist))
|
||||
(body (assoc "Body" alist))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue