diff options
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/reftex-ref.el | 2 | ||||
| -rw-r--r-- | lisp/textmodes/reftex-toc.el | 2 | ||||
| -rw-r--r-- | lisp/textmodes/table.el | 24 | ||||
| -rw-r--r-- | lisp/textmodes/two-column.el | 2 |
4 files changed, 15 insertions, 15 deletions
diff --git a/lisp/textmodes/reftex-ref.el b/lisp/textmodes/reftex-ref.el index 07147230094..df78447defb 100644 --- a/lisp/textmodes/reftex-ref.el +++ b/lisp/textmodes/reftex-ref.el @@ -228,7 +228,7 @@ This function is controlled by the settings of reftex-insert-label-flags." (symbol-value reftex-docstruct-symbol))) (ding) (if (y-or-n-p - (format-message "Label ‘%s’ exists. Use anyway? " label)) +` (format-message "Label `%s' exists. Use anyway? " label)) (setq valid t))) ;; Label is ok diff --git a/lisp/textmodes/reftex-toc.el b/lisp/textmodes/reftex-toc.el index b9d4b7c0f2a..bdae6e54ef3 100644 --- a/lisp/textmodes/reftex-toc.el +++ b/lisp/textmodes/reftex-toc.el @@ -876,7 +876,7 @@ label prefix determines the wording of a reference." (setq newlabel (read-string (format "Rename label \"%s\" to:" label))) (if (assoc newlabel (symbol-value reftex-docstruct-symbol)) (if (not (y-or-n-p - (format-message "Label ‘%s’ exists. Use anyway? " label))) + (format-message "Label `%s' exists. Use anyway? " label))) (error "Abort"))) (save-excursion (save-window-excursion diff --git a/lisp/textmodes/table.el b/lisp/textmodes/table.el index 9c50eca6419..151d64808af 100644 --- a/lisp/textmodes/table.el +++ b/lisp/textmodes/table.el @@ -2806,8 +2806,8 @@ ORIENTATION is a symbol either horizontally or vertically." ;;;###autoload (defun table-justify (what justify) "Justify contents of a cell, a row of cells or a column of cells. -WHAT is a symbol ‘cell’, ‘row’ or ‘column’. JUSTIFY is a symbol -‘left’, ‘center’, ‘right’, ‘top’, ‘middle’, ‘bottom’ or ‘none’." +WHAT is a symbol `cell', `row' or `column'. JUSTIFY is a symbol +`left', `center', `right', `top', `middle', `bottom' or `none'." (interactive (list (let* ((_ (barf-if-buffer-read-only)) (completion-ignore-case t) @@ -2822,8 +2822,8 @@ WHAT is a symbol ‘cell’, ‘row’ or ‘column’. JUSTIFY is a symbol ;;;###autoload (defun table-justify-cell (justify &optional paragraph) "Justify cell contents. -JUSTIFY is a symbol ‘left’, ‘center’ or ‘right’ for horizontal, or ‘top’, -‘middle’, ‘bottom’ or ‘none’ for vertical. When optional PARAGRAPH is +JUSTIFY is a symbol `left', `center' or `right' for horizontal, or `top', +`middle', `bottom' or `none' for vertical. When optional PARAGRAPH is non-nil the justify operation is limited to the current paragraph, otherwise the entire cell contents is justified." (interactive @@ -2835,8 +2835,8 @@ otherwise the entire cell contents is justified." ;;;###autoload (defun table-justify-row (justify) "Justify cells of a row. -JUSTIFY is a symbol ‘left’, ‘center’ or ‘right’ for horizontal, -or ‘top’, ‘middle’, ‘bottom’ or ‘none’ for vertical." +JUSTIFY is a symbol `left', `center' or `right' for horizontal, +or `top', `middle', `bottom' or `none' for vertical." (interactive (list (table--query-justification))) (let((cell-list (table--horizontal-cell-list nil nil 'top))) @@ -2852,8 +2852,8 @@ or ‘top’, ‘middle’, ‘bottom’ or ‘none’ for vertical." ;;;###autoload (defun table-justify-column (justify) "Justify cells of a column. -JUSTIFY is a symbol ‘left’, ‘center’ or ‘right’ for horizontal, -or ‘top’, ‘middle’, ‘bottom’ or ‘none’ for vertical." +JUSTIFY is a symbol `left', `center' or `right' for horizontal, +or `top', `middle', `bottom' or `none' for vertical." (interactive (list (table--query-justification))) (let((cell-list (table--vertical-cell-list nil nil 'left))) @@ -3341,8 +3341,8 @@ INTERVAL is the number of cells to travel between sequence element insertion which is normally 1. When zero or less is given for INTERVAL it is interpreted as number of cells per row so that sequence is placed straight down vertically as long as the table's cell -structure is uniform. JUSTIFY is a symbol ‘left’, ‘center’ or -‘right’ that specifies justification of the inserted string. +structure is uniform. JUSTIFY is a symbol `left', `center' or +`right' that specifies justification of the inserted string. Example: @@ -4461,8 +4461,8 @@ looking at the appearance of the CELL contents." (defun table--justify-cell-contents (justify &optional paragraph) "Justify the current cell contents. -JUSTIFY is a symbol ‘left’, ‘center’ or ‘right’ for horizontal, or ‘top’, -‘middle’, ‘bottom’ or ‘none’ for vertical. When PARAGRAPH is non-nil the +JUSTIFY is a symbol `left', `center' or `right' for horizontal, or `top', +`middle', `bottom' or `none' for vertical. When PARAGRAPH is non-nil the justify operation is limited to the current paragraph." (table-with-cache-buffer (let ((beg (point-min)) diff --git a/lisp/textmodes/two-column.el b/lisp/textmodes/two-column.el index 5e318b5569e..4133e0fa126 100644 --- a/lisp/textmodes/two-column.el +++ b/lisp/textmodes/two-column.el @@ -373,7 +373,7 @@ First column's text sSs Second column's text \(See \\[describe-mode] .)" (interactive "*p") (and (2C-other) - (if (y-or-n-p (format-message "Overwrite associated buffer ‘%s’? " + (if (y-or-n-p (format-message "Overwrite associated buffer `%s'? " (buffer-name (2C-other)))) (with-current-buffer (2C-other) (erase-buffer)) |