diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2015-09-01 18:21:42 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2015-09-01 18:23:21 -0700 |
| commit | 19532d147b431a4fe34f088d6de07891c48e2c5c (patch) | |
| tree | 19baea54fefb82f849ed67e49a287a715fe050cc /lisp/textmodes | |
| parent | 5dc644a6b01e2cf950ff617ab15be4bf1917c38c (diff) | |
| download | emacs-19532d147b431a4fe34f088d6de07891c48e2c5c.tar.gz | |
Escape ` and ' in doc
Escape apostrophes and grave accents in docstrings if they are
are supposed to stand for themselves and are not quotes. Remove
apostrophes from docstring examples like ‘'(calendar-nth-named-day
-1 0 10 year)’ that confuse source code with data. Do some other
minor docstring fixups as well, e.g., insert a missing close
quote.
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/table.el | 10 | ||||
| -rw-r--r-- | lisp/textmodes/tildify.el | 4 |
2 files changed, 7 insertions, 7 deletions
diff --git a/lisp/textmodes/table.el b/lisp/textmodes/table.el index 93b31d5c86c..9c50eca6419 100644 --- a/lisp/textmodes/table.el +++ b/lisp/textmodes/table.el @@ -3349,17 +3349,17 @@ Example: (progn (table-insert 16 3 5 1) (table-forward-cell 15) - (table-insert-sequence \"D0\" -16 1 1 'center) + (table-insert-sequence \"D0\" -16 1 1 \\='center) (table-forward-cell 16) - (table-insert-sequence \"A[0]\" -16 1 1 'center) + (table-insert-sequence \"A[0]\" -16 1 1 \\='center) (table-forward-cell 1) - (table-insert-sequence \"-\" 16 0 1 'center)) + (table-insert-sequence \"-\" 16 0 1 \\='center)) (progn (table-insert 16 8 5 1) - (table-insert-sequence \"@\" 0 1 2 'right) + (table-insert-sequence \"@\" 0 1 2 \\='right) (table-forward-cell 1) - (table-insert-sequence \"64\" 0 1 2 'left))" + (table-insert-sequence \"64\" 0 1 2 \\='left))" (interactive (progn (barf-if-buffer-read-only) diff --git a/lisp/textmodes/tildify.el b/lisp/textmodes/tildify.el index 4e385a0fbd3..c94e417a7ea 100644 --- a/lisp/textmodes/tildify.el +++ b/lisp/textmodes/tildify.el @@ -291,8 +291,8 @@ BEG argument is ignored. This function is meant to be used to set `tildify-foreach-region-function' variable. For example, for an XML file one might use: (setq-local tildify-foreach-region-function - (apply-partially 'tildify-foreach-ignore-environments - '((\"<! *--\" . \"-- *>\") (\"<\" . \">\"))))" + (apply-partially \\='tildify-foreach-ignore-environments + \\='((\"<! *--\" . \"-- *>\") (\"<\" . \">\"))))" (let ((beg-re (concat "\\(?:" (mapconcat 'car pairs "\\)\\|\\(?:") "\\)")) p end-re) (save-excursion |