diff options
Diffstat (limited to 'src/doc.c')
| -rw-r--r-- | src/doc.c | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -761,8 +761,8 @@ Otherwise, return a new string. */) | |||
| 761 | Lisp_Object dv = DISP_CHAR_VECTOR (XCHAR_TABLE (Vstandard_display_table), | 761 | Lisp_Object dv = DISP_CHAR_VECTOR (XCHAR_TABLE (Vstandard_display_table), |
| 762 | LEFT_SINGLE_QUOTATION_MARK); | 762 | LEFT_SINGLE_QUOTATION_MARK); |
| 763 | if (VECTORP (dv) && ASIZE (dv) == 1 | 763 | if (VECTORP (dv) && ASIZE (dv) == 1 |
| 764 | && EQ (AREF (dv, 0), make_number ('\''))) | 764 | && EQ (AREF (dv, 0), make_number ('`'))) |
| 765 | quote_translation = apostrophe; | 765 | quote_translation = grave_accent; |
| 766 | } | 766 | } |
| 767 | 767 | ||
| 768 | multibyte = STRING_MULTIBYTE (string); | 768 | multibyte = STRING_MULTIBYTE (string); |
| @@ -1040,7 +1040,7 @@ Quote \\=‘like this\\=’ if the value is ?\\=‘ (left single quotation mark) | |||
| 1040 | Quote 'like this' if the value is ?' (apostrophe). | 1040 | Quote 'like this' if the value is ?' (apostrophe). |
| 1041 | Quote \\=`like this' if the value is ?\\=` (grave accent). | 1041 | Quote \\=`like this' if the value is ?\\=` (grave accent). |
| 1042 | The default value is nil, which means quote with left single quotation mark | 1042 | The default value is nil, which means quote with left single quotation mark |
| 1043 | if displayable, and with apostrophe otherwise. */); | 1043 | if displayable, and with grave accent otherwise. */); |
| 1044 | Vhelp_quote_translation = Qnil; | 1044 | Vhelp_quote_translation = Qnil; |
| 1045 | 1045 | ||
| 1046 | defsubr (&Sdocumentation); | 1046 | defsubr (&Sdocumentation); |