From: Eli Zaretskii Date: Tue, 30 Aug 2022 17:20:40 +0000 (+0300) Subject: ; Improve doc string of 'describe-char-fold-equivalences' X-Git-Tag: emacs-29.0.90~1856^2~825 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e1c4ed9a3e70d4ed7162a77103d034deef428452;p=emacs.git ; Improve doc string of 'describe-char-fold-equivalences' * lisp/char-fold.el (describe-char-fold-equivalences): Autoload it. Doc fix. --- diff --git a/lisp/char-fold.el b/lisp/char-fold.el index ce395ddaab0..4e3aa058fcb 100644 --- a/lisp/char-fold.el +++ b/lisp/char-fold.el @@ -428,12 +428,15 @@ BOUND NOERROR COUNT are passed to `re-search-backward'." (re-search-backward (char-fold-to-regexp string) bound noerror count)) +;;;###autoload (defun describe-char-fold-equivalences (char &optional lax) - "Display characters equivalent to CHAR. -Prompt for CHAR. With no input, i.e. when CHAR is nil, by default + "Display characters equivalent to CHAR under character-folding. +Prompt for CHAR (using `read-char-by-name', which see for how can +you specify the character). With no input, i.e. when CHAR is nil, describe all available character equivalences of `char-fold-to-regexp'. -Interactively, a prefix arg means also include partially matching -ligatures." +Optional argument LAX (interactively, the prefix argument), if +non-nil, means also include partially matching ligatures and +non-canonical equivalences." (interactive (list (ignore-errors (read-char-by-name "Character (Unicode name or hex, default all): "))