From: Glenn Morris <rgm@gnu.org>
Date: Wed, 1 Mar 2017 21:53:08 +0000 (-0500)
Subject: Fix for coding-system completion (bug#23670)
X-Git-Tag: emacs-26.0.90~678
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=79abec2feefa6169b8073cacde98a02d8087c19b;p=emacs.git

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 "*?".
---

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.")
                                     preferred))))))
          (completion-ignore-case t)
          (completion-pcm--delim-wild-regex ; Let "u8" complete to "utf-8".
-          (concat completion-pcm--delim-wild-regex
-                  "\\|\\([[:alpha:]]\\)[[:digit:]]"))
+          (concat "\\(?:" completion-pcm--delim-wild-regex
+                  "\\|\\([[:alpha:]]\\)[[:digit:]]\\)"))
          (cs (completing-read
               (format "Coding system for saving file (default %s): " default)
               combined-table