Add new bidi-string-strip-control-characters function

* lisp/international/characters.el
(bidi-string-strip-control-characters): New function.
This commit is contained in:
Lars Ingebrigtsen 2022-01-20 07:44:49 +01:00
parent e4f59a6d1a
commit 7785463c8e
2 changed files with 10 additions and 0 deletions

View file

@ -960,6 +960,10 @@ The input must be encoded text.
* Lisp Changes in Emacs 29.1
** New function 'bidi-string-strip-control-characters'.
This utility function is meant for displaying strings when it's
essential that there's no bidirectional context.
---
** The Gnus range functions have been moved to a new library, range.el.
All the old names have been made obsolete.

View file

@ -1541,6 +1541,12 @@ Setup `char-width-table' appropriate for non-CJK language environment."
#x2069) ; ?\N{pop directional isolate}
"List of bidirectional control characters.")
(defun bidi-string-strip-control-characters (string)
"Strip bidi control characters from STRING and return the result."
(apply #'string (seq-filter (lambda (char)
(not (memq char bidi-control-characters)))
string)))
(defun update-glyphless-char-display (&optional variable value)
"Make the setting of `glyphless-char-display-control' take effect.
This function updates the char-table `glyphless-char-display',