aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/emulation
diff options
context:
space:
mode:
authorPaul Eggert2015-09-03 15:31:12 -0700
committerPaul Eggert2015-09-03 15:32:54 -0700
commit26bd978d87dfbf9baa115cd961a67d42b416c4bf (patch)
tree20f3d063895796f54b9f521c0b35f65bbcd418c4 /lisp/emulation
parent944d77f070da388b0c6e6578a9f868e88c088940 (diff)
downloademacs-26bd978d87dfbf9baa115cd961a67d42b416c4bf.tar.gz
emacs-26bd978d87dfbf9baa115cd961a67d42b416c4bf.zip
Fix some more docstring etc. quoting problems
Mostly these fixes prevent the transliteration of apostrophes that should stay apostrophes. Also, prefer curved quotes in Bahá’í proper names, as that’s the preferred Bahá’í style and these names are chock-full of non-ASCII characters anyway. * lisp/emacs-lisp/eieio-core.el (eieio-defclass-autoload) (eieio-defclass-internal): * lisp/emacs-lisp/eieio.el (defclass): * lisp/hi-lock.el (hi-lock-mode): Don’t transliterate Lisp apostrophes when generating a doc string or diagnostic. * lisp/international/mule-diag.el (list-coding-systems-1): * lisp/international/ogonek.el (ogonek-jak, ogonek-how): * lisp/mail/sendmail.el (sendmail-query-user-about-smtp): * lisp/vc/ediff-mult.el (ediff-redraw-registry-buffer): * lisp/vc/ediff-ptch.el (ediff-fixup-patch-map): Substitute quotes before putting them in the help buffer.
Diffstat (limited to 'lisp/emulation')
-rw-r--r--lisp/emulation/viper-keym.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emulation/viper-keym.el b/lisp/emulation/viper-keym.el
index 250c292d72e..272556d3bae 100644
--- a/lisp/emulation/viper-keym.el
+++ b/lisp/emulation/viper-keym.el
@@ -502,7 +502,7 @@ ALIST is of the form ((key . func) (key . func) ...)
502Normally, this would be called from a hook to a major mode or 502Normally, this would be called from a hook to a major mode or
503on a per buffer basis. 503on a per buffer basis.
504Usage: 504Usage:
505 (viper-add-local-keys state '((key-str . func) (key-str . func)...)) " 505 (viper-add-local-keys state \\='((key-str . func) (key-str . func)...)) "
506 506
507 (let (map) 507 (let (map)
508 (cond ((eq state 'vi-state) 508 (cond ((eq state 'vi-state)