diff options
| author | Glenn Morris | 2017-03-01 16:53:08 -0500 |
|---|---|---|
| committer | Glenn Morris | 2017-03-01 16:53:08 -0500 |
| commit | 79abec2feefa6169b8073cacde98a02d8087c19b (patch) | |
| tree | a65d70f866fce08665ea9abf952a088edc60e184 | |
| parent | 207ee94b1d1f3cbe5ddd87a4cdfae17e5ad8419d (diff) | |
| download | emacs-79abec2feefa6169b8073cacde98a02d8087c19b.tar.gz emacs-79abec2feefa6169b8073cacde98a02d8087c19b.zip | |
Fix for coding-system completion (bug#23670)
* lisp/international/mule.el (read-buffer-file-coding-system):
Ensure that completion-pcm--delim-wild-regex is enclosed in parens,
so that completion-pcm--pattern->regex can append "*?".
| -rw-r--r-- | lisp/international/mule.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 8754f7f27d7..fa3ad80e2f7 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el | |||
| @@ -1311,8 +1311,8 @@ Internal use only.") | |||
| 1311 | preferred)))))) | 1311 | preferred)))))) |
| 1312 | (completion-ignore-case t) | 1312 | (completion-ignore-case t) |
| 1313 | (completion-pcm--delim-wild-regex ; Let "u8" complete to "utf-8". | 1313 | (completion-pcm--delim-wild-regex ; Let "u8" complete to "utf-8". |
| 1314 | (concat completion-pcm--delim-wild-regex | 1314 | (concat "\\(?:" completion-pcm--delim-wild-regex |
| 1315 | "\\|\\([[:alpha:]]\\)[[:digit:]]")) | 1315 | "\\|\\([[:alpha:]]\\)[[:digit:]]\\)")) |
| 1316 | (cs (completing-read | 1316 | (cs (completing-read |
| 1317 | (format "Coding system for saving file (default %s): " default) | 1317 | (format "Coding system for saving file (default %s): " default) |
| 1318 | combined-table | 1318 | combined-table |