diff options
| author | Paul Eggert | 2016-08-13 23:30:55 -0500 |
|---|---|---|
| committer | Paul Eggert | 2016-08-13 23:32:36 -0500 |
| commit | 66ae4cada5bb22737e63e59fdaf0983b12dc29bc (patch) | |
| tree | 6712348da0af6196a8d0aa9a95c80eaa04662c60 | |
| parent | 2791580f5eaa65948a13ea4ea4952d03b4da795b (diff) | |
| download | emacs-66ae4cada5bb22737e63e59fdaf0983b12dc29bc.tar.gz emacs-66ae4cada5bb22737e63e59fdaf0983b12dc29bc.zip | |
Minor text-quoting-style fixes
* lisp/cus-edit.el (custom-buffer-create-internal):
* lisp/recentf.el (recentf-edit-list):
Follow text-quoting-style preference when quoting in UI strings.
* src/doc.c (Fsubstitute_command_keys): Don’t say that curved
quotes are substituted for, as this is no longer true.
| -rw-r--r-- | lisp/cus-edit.el | 4 | ||||
| -rw-r--r-- | lisp/recentf.el | 5 | ||||
| -rw-r--r-- | src/doc.c | 8 |
3 files changed, 10 insertions, 7 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index ef1274534d6..2e39514cac6 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el | |||
| @@ -1617,7 +1617,9 @@ Otherwise use brackets." | |||
| 1617 | ;; Insert verbose help at the top of the custom buffer. | 1617 | ;; Insert verbose help at the top of the custom buffer. |
| 1618 | (when custom-buffer-verbose-help | 1618 | (when custom-buffer-verbose-help |
| 1619 | (unless init-file | 1619 | (unless init-file |
| 1620 | (widget-insert "Custom settings cannot be saved; maybe you started Emacs with `-q'.\n")) | 1620 | (widget-insert |
| 1621 | (format-message | ||
| 1622 | "Custom settings cannot be saved; maybe you started Emacs with `-q'.\n"))) | ||
| 1621 | (widget-insert "For help using this buffer, see ") | 1623 | (widget-insert "For help using this buffer, see ") |
| 1622 | (widget-create 'custom-manual | 1624 | (widget-create 'custom-manual |
| 1623 | :tag "Easy Customization" | 1625 | :tag "Easy Customization" |
diff --git a/lisp/recentf.el b/lisp/recentf.el index dc9489752fb..e30e6468ebb 100644 --- a/lisp/recentf.el +++ b/lisp/recentf.el | |||
| @@ -1124,8 +1124,9 @@ IGNORE arguments." | |||
| 1124 | (recentf-dialog (format "*%s - Edit list*" recentf-menu-title) | 1124 | (recentf-dialog (format "*%s - Edit list*" recentf-menu-title) |
| 1125 | (set (make-local-variable 'recentf-edit-list) nil) | 1125 | (set (make-local-variable 'recentf-edit-list) nil) |
| 1126 | (widget-insert | 1126 | (widget-insert |
| 1127 | "Click on OK to delete selected files from the recent list. | 1127 | (format-message |
| 1128 | Click on Cancel or type `q' to cancel.\n") | 1128 | "Click on OK to delete selected files from the recent list. |
| 1129 | Click on Cancel or type `q' to cancel.\n")) | ||
| 1129 | ;; Insert the list of files as checkboxes | 1130 | ;; Insert the list of files as checkboxes |
| 1130 | (dolist (item recentf-list) | 1131 | (dolist (item recentf-list) |
| 1131 | (widget-create 'checkbox | 1132 | (widget-create 'checkbox |
| @@ -714,13 +714,13 @@ summary). | |||
| 714 | Each substring of the form \\=\\<MAPVAR> specifies the use of MAPVAR | 714 | Each substring of the form \\=\\<MAPVAR> specifies the use of MAPVAR |
| 715 | as the keymap for future \\=\\[COMMAND] substrings. | 715 | as the keymap for future \\=\\[COMMAND] substrings. |
| 716 | 716 | ||
| 717 | Each \\=‘ and \\=` is replaced by left quote, and each \\=’ and \\=' | 717 | Each grave accent \\=` is replaced by left quote, and each apostrophe \\=' |
| 718 | is replaced by right quote. Left and right quote characters are | 718 | is replaced by right quote. Left and right quote characters are |
| 719 | specified by `text-quoting-style'. | 719 | specified by `text-quoting-style'. |
| 720 | 720 | ||
| 721 | \\=\\= quotes the following character and is discarded; thus, | 721 | \\=\\= quotes the following character and is discarded; thus, \\=\\=\\=\\= puts \\=\\= |
| 722 | \\=\\=\\=\\= puts \\=\\= into the output, \\=\\=\\=\\[ puts \\=\\[ into the output, and | 722 | into the output, \\=\\=\\=\\[ puts \\=\\[ into the output, and \\=\\=\\=` puts \\=` into the |
| 723 | \\=\\=\\=` puts \\=` into the output. | 723 | output. |
| 724 | 724 | ||
| 725 | Return the original STRING if no substitutions are made. | 725 | Return the original STRING if no substitutions are made. |
| 726 | Otherwise, return a new string. */) | 726 | Otherwise, return a new string. */) |