diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/doc.c | 14 | ||||
| -rw-r--r-- | src/editfns.c | 4 | ||||
| -rw-r--r-- | src/keyboard.c | 8 |
3 files changed, 13 insertions, 13 deletions
diff --git a/src/doc.c b/src/doc.c index 5d0aae795b7..b6963d2ab0b 100644 --- a/src/doc.c +++ b/src/doc.c @@ -724,7 +724,7 @@ as the keymap for future \\=\\[COMMAND] substrings. Each \\=‘ and \\=` is replaced by left quote, and each \\=’ and \\=' is replaced by right quote. Left and right quote characters are -specified by ‘text-quoting-style’. +specified by `text-quoting-style'. \\=\\= quotes the following character and is discarded; thus, \\=\\=\\=\\= puts \\=\\= into the output, \\=\\=\\=\\[ puts \\=\\[ into the output, and @@ -1024,15 +1024,15 @@ syms_of_doc (void) DEFVAR_LISP ("text-quoting-style", Vtext_quoting_style, doc: /* Style to use for single quotes when generating text. -‘curve’ means quote with curved single quotes \\=‘like this\\=’. -‘straight’ means quote with straight apostrophes \\='like this\\='. -‘grave’ means quote with grave accent and apostrophe \\=`like this\\='. -The default value nil acts like ‘curve’ if curved single quotes are -displayable, and like ‘grave’ otherwise. */); +`curve' means quote with curved single quotes \\=‘like this\\=’. +`straight' means quote with straight apostrophes \\='like this\\='. +`grave' means quote with grave accent and apostrophe \\=`like this\\='. +The default value nil acts like `curve' if curved single quotes are +displayable, and like `grave' otherwise. */); Vtext_quoting_style = Qnil; DEFVAR_BOOL ("internal--text-quoting-flag", text_quoting_flag, - doc: /* If nil, a nil ‘text-quoting-style’ is treated as ‘grave’. */); + doc: /* If nil, a nil `text-quoting-style' is treated as `grave'. */); /* Initialized by ‘main’. */ defsubr (&Sdocumentation); diff --git a/src/editfns.c b/src/editfns.c index e7d5dd89e51..831edb4c171 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -3837,11 +3837,11 @@ DEFUN ("format-message", Fformat_message, Sformat_message, 1, MANY, 0, The first argument is a format control string. The other arguments are substituted into it to make the result, a string. -This acts like ‘format’, except it also replaces each left single +This acts like `format', except it also replaces each left single quotation mark (\\=‘) and grave accent (\\=`) by a left quote, and each right single quotation mark (\\=’) and apostrophe (\\=') by a right quote. The left and right quote replacement characters are specified by -‘text-quoting-style’. +`text-quoting-style'. usage: (format-message STRING &rest OBJECTS) */) (ptrdiff_t nargs, Lisp_Object *args) diff --git a/src/keyboard.c b/src/keyboard.c index 7d6a2b00860..ccd340557dd 100644 --- a/src/keyboard.c +++ b/src/keyboard.c @@ -703,11 +703,11 @@ force_auto_save_soon (void) DEFUN ("recursive-edit", Frecursive_edit, Srecursive_edit, 0, 0, "", doc: /* Invoke the editor command loop recursively. -To get out of the recursive edit, a command can throw to ‘exit’ -- for -instance ‘(throw \\='exit nil)’. -If you throw a value other than t, ‘recursive-edit’ returns normally +To get out of the recursive edit, a command can throw to `exit' -- for +instance (throw \\='exit nil). +If you throw a value other than t, `recursive-edit' returns normally to the function that called it. Throwing a t value causes -‘recursive-edit’ to quit, so that control returns to the command loop +`recursive-edit' to quit, so that control returns to the command loop one level up. This function is called by the editor initialization to begin editing. */) |