diff options
| author | Andreas Schwab | 2015-08-23 13:42:04 +0200 |
|---|---|---|
| committer | Andreas Schwab | 2015-08-23 16:33:39 +0200 |
| commit | 0b0c9565d050bfecc581b342c40b719917395896 (patch) | |
| tree | 66db74031501dff2cd612095c62a6d065a25b023 /src | |
| parent | 70ff62413a17cbe5a4f218202a6a91c38d86c8c8 (diff) | |
| download | emacs-0b0c9565d050bfecc581b342c40b719917395896.tar.gz emacs-0b0c9565d050bfecc581b342c40b719917395896.zip | |
Revert "Prefer ‘format’ to ‘substitute-command-keys’"
This reverts commit 6af5aad26411ffe21c3fe4bc5438347110910111.
Diffstat (limited to 'src')
| -rw-r--r-- | src/doc.c | 9 | ||||
| -rw-r--r-- | src/syntax.c | 8 |
2 files changed, 8 insertions, 9 deletions
| @@ -927,13 +927,14 @@ Otherwise, return a new string. */) | |||
| 927 | if (NILP (tem)) | 927 | if (NILP (tem)) |
| 928 | { | 928 | { |
| 929 | name = Fsymbol_name (name); | 929 | name = Fsymbol_name (name); |
| 930 | insert1 (CALLN (Fformat, build_string ("\nUses keymap "uLSQM))); | 930 | insert1 (Fsubstitute_command_keys |
| 931 | (build_string ("\nUses keymap "uLSQM))); | ||
| 931 | insert_from_string (name, 0, 0, | 932 | insert_from_string (name, 0, 0, |
| 932 | SCHARS (name), | 933 | SCHARS (name), |
| 933 | SBYTES (name), 1); | 934 | SBYTES (name), 1); |
| 934 | insert1 (CALLN (Fformat, | 935 | insert1 (Fsubstitute_command_keys |
| 935 | (build_string | 936 | (build_string |
| 936 | (uRSQM", which is not currently defined.\n")))); | 937 | (uRSQM", which is not currently defined.\n"))); |
| 937 | if (start[-1] == '<') keymap = Qnil; | 938 | if (start[-1] == '<') keymap = Qnil; |
| 938 | } | 939 | } |
| 939 | else if (start[-1] == '<') | 940 | else if (start[-1] == '<') |
diff --git a/src/syntax.c b/src/syntax.c index 30560affdf0..d45936b2b28 100644 --- a/src/syntax.c +++ b/src/syntax.c | |||
| @@ -1333,11 +1333,9 @@ DEFUN ("internal-describe-syntax-value", Finternal_describe_syntax_value, | |||
| 1333 | insert_string (" (nestable)"); | 1333 | insert_string (" (nestable)"); |
| 1334 | 1334 | ||
| 1335 | if (prefix) | 1335 | if (prefix) |
| 1336 | { | 1336 | insert1 (Fsubstitute_command_keys |
| 1337 | AUTO_STRING (prefixdoc, | 1337 | (build_string |
| 1338 | ",\n\t is a prefix character for `backward-prefix-chars'"); | 1338 | (",\n\t is a prefix character for `backward-prefix-chars'"))); |
| 1339 | insert1 (Fsubstitute_command_keys (prefixdoc)); | ||
| 1340 | } | ||
| 1341 | 1339 | ||
| 1342 | return syntax; | 1340 | return syntax; |
| 1343 | } | 1341 | } |