diff options
Diffstat (limited to 'lisp/url/url-mailto.el')
-rw-r--r-- | lisp/url/url-mailto.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/url/url-mailto.el b/lisp/url/url-mailto.el index 72884c07cc9..4fd631d2955 100644 --- a/lisp/url/url-mailto.el +++ b/lisp/url/url-mailto.el @@ -1,4 +1,4 @@ -;;; url-mail.el --- Mail Uniform Resource Locator retrieval code -*- lexical-binding: t; -*- +;;; url-mailto.el --- Mail Uniform Resource Locator retrieval code -*- lexical-binding: t; -*- ;; Copyright (C) 1996-1999, 2004-2021 Free Software Foundation, Inc. @@ -104,8 +104,8 @@ (or (search-forward (concat "\n" mail-header-separator "\n") nil t) (goto-char (point-max))) (insert (mapconcat - #'(lambda (string) - (replace-regexp-in-string "\r\n" "\n" string)) + (lambda (string) + (string-replace "\r\n" "\n" string)) (cdar args) "\n"))) (url-mail-goto-field (caar args)) ;; (setq func (intern-soft (concat "mail-" (caar args)))) |