diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2015-05-19 19:08:11 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2015-05-19 19:08:52 -0700 |
| commit | f743819b57ef519109c1b9d520d358d19a197086 (patch) | |
| tree | f1f175931ab3b9750ef51cbf92202f8856c94afe /lisp/mail | |
| parent | 9d35bb8d6518bb913ab08bace2af08963c003177 (diff) | |
| download | emacs-f743819b57ef519109c1b9d520d358d19a197086.tar.gz emacs-f743819b57ef519109c1b9d520d358d19a197086.tar.bz2 emacs-f743819b57ef519109c1b9d520d358d19a197086.zip | |
Prefer "this" to “this” in doc strings
This mostly just straightens quotes introduced in my previous patch.
Suggested by Dmitry Gutov in:
http://lists.gnu.org/archive/html/emacs-devel/2015-05/msg00565.html
* lisp/faces.el, lisp/gnus/gnus-group.el, lisp/ldefs-boot.el:
* lisp/mail/supercite.el, lisp/net/tramp.el, lisp/recentf.el:
* lisp/textmodes/artist.el, lisp/textmodes/rst.el:
* lisp/textmodes/tildify.el, lisp/vc/ediff-util.el:
* lisp/vc/log-edit.el, lisp/xt-mouse.el:
Prefer straight double quotes to curved double quotes in doc strings.
Diffstat (limited to 'lisp/mail')
| -rw-r--r-- | lisp/mail/supercite.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/mail/supercite.el b/lisp/mail/supercite.el index f6b27c24f98..56158cc156c 100644 --- a/lisp/mail/supercite.el +++ b/lisp/mail/supercite.el @@ -886,10 +886,10 @@ Action can be one of: View, Modify, Add, or Delete." (defun sc-attribs-%@-addresses (from &optional delim) "Extract the author's email terminus from email address FROM. -Match addresses of the style “name%[stuff].” when called with DELIM -of \"%\" and addresses of the style “[stuff]name@[stuff]” when +Match addresses of the style \"name%[stuff].\" when called with DELIM +of \"%\" and addresses of the style \"[stuff]name@[stuff]\" when called with DELIM \"@\". If DELIM is nil or not provided, matches -addresses of the style “name”." +addresses of the style \"name\"." (and (string-match (concat "[-[:alnum:]_.]+" delim) from 0) (substring from (match-beginning 0) @@ -897,7 +897,7 @@ addresses of the style “name”." (defun sc-attribs-!-addresses (from) "Extract the author's email terminus from email address FROM. -Match addresses of the style “[stuff]![stuff]...!name[stuff].”" +Match addresses of the style \"[stuff]![stuff]...!name[stuff].\"" (let ((eos (length from)) (mstart (string-match "![-[:alnum:]_.]+\\([^-![:alnum:]_.]\\|$\\)" from 0)) @@ -907,7 +907,7 @@ Match addresses of the style “[stuff]![stuff]...!name[stuff].”" (defun sc-attribs-<>-addresses (from) "Extract the author's email terminus from email address FROM. -Match addresses of the style “<name[stuff]>.”" +Match addresses of the style \"<name[stuff]>.\"" (and (string-match "<\\(.*\\)>" from) (match-string 1 from))) |