From b43c4616ccc9cbaf7bc1531d0e6a4a84227f339e Mon Sep 17 00:00:00 2001 From: Ruslan Bekenev Date: Fri, 19 May 2017 14:35:47 +0300 Subject: [PATCH] Fix typos in doc strings * lisp/mail/rfc2231.el (rfc2231-encode-string): * lisp/mail/rfc2047.el (rfc2047-encode-parameter): * lisp/mail/rfc2045.el (rfc2045-encode-string): Fix typos in doc strings. (Bug#26103) --- lisp/mail/rfc2045.el | 2 +- lisp/mail/rfc2047.el | 2 +- lisp/mail/rfc2231.el | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/mail/rfc2045.el b/lisp/mail/rfc2045.el index f6000500e11..11a6151887a 100644 --- a/lisp/mail/rfc2045.el +++ b/lisp/mail/rfc2045.el @@ -28,7 +28,7 @@ (require 'ietf-drums) (defun rfc2045-encode-string (param value) - "Return and PARAM=VALUE string encoded according to RFC2045." + "Return a PARAM=VALUE string encoded according to RFC2045." (if (or (string-match (concat "[" ietf-drums-no-ws-ctl-token "]") value) (string-match (concat "[" ietf-drums-tspecials "]") value) (string-match "[ \n\t]" value) diff --git a/lisp/mail/rfc2047.el b/lisp/mail/rfc2047.el index bcbdc17631d..d276e2117f4 100644 --- a/lisp/mail/rfc2047.el +++ b/lisp/mail/rfc2047.el @@ -851,7 +851,7 @@ Point moves to the end of the region." (buffer-string))) (defun rfc2047-encode-parameter (param value) - "Return and PARAM=VALUE string encoded in the RFC2047-like style. + "Return a PARAM=VALUE string encoded in the RFC2047-like style. This is a substitution for the `rfc2231-encode-string' function, that is the standard but many mailers don't support it." (let ((rfc2047-encoding-type 'mime) diff --git a/lisp/mail/rfc2231.el b/lisp/mail/rfc2231.el index ba972c73460..66f539f6986 100644 --- a/lisp/mail/rfc2231.el +++ b/lisp/mail/rfc2231.el @@ -234,7 +234,7 @@ These look like: (decode-coding-string (buffer-string) coding-system))))) (defun rfc2231-encode-string (param value) - "Return and PARAM=VALUE string encoded according to RFC2231. + "Return a PARAM=VALUE string encoded according to RFC2231. Use `mml-insert-parameter' or `mml-insert-parameter-string' to insert the result of this function." (let ((control (ietf-drums-token-to-list ietf-drums-no-ws-ctl-token)) -- 2.39.2