Fix detection of char regions in print-fontset-element

* lisp/international/mule-diag.el (print-fontset-element): Fix the
regexp for "foo .. bar " (bug#50519).

diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el
index 864cd3ce01e5de287c9770749ff8e9b55cd197ef..862c577bd5de5f356a13ee145b3f4b60091384c7 100644 (file)
--- a/lisp/international/mule-diag.el
+++ b/lisp/international/mule-diag.el
@@ -882,7 +882,7 @@ The IGNORED argument is ignored."
   ;; the current line.
   (beginning-of-line)
   (let ((from (mule--kbd-at (point)))
-       (to (if (looking-at "[^.]*[.]* ")
+       (to (if (looking-at "[^.]+[.][.] ")
                (mule--kbd-at (match-end 0)))))
     (if (re-search-forward "[ \t]*$" nil t)
        (delete-region (match-beginning 0) (match-end 0)))