(fix)node: fix wrong string-glyph-* aliases (#1985)

This commit is contained in:
Jethro Kuan
2021-11-24 15:13:41 +08:00
committed by GitHub
parent c9efbe1dda
commit 67f10864df

View File

@ -154,8 +154,8 @@ It takes a single argument REF, which is a propertized string."
;; The functions were introduced in emacs commit 3f096eb3405b2fce7c35366eb2dcf025dda55783 and the ;; The functions were introduced in emacs commit 3f096eb3405b2fce7c35366eb2dcf025dda55783 and the
;; (original) functions behind them aren't autoloaded anymore. ;; (original) functions behind them aren't autoloaded anymore.
(dolist (sym.replace (dolist (sym.replace
'((string-glyph-compose . ucs-normalize-NFC-region) '((string-glyph-compose . ucs-normalize-NFC-string)
(string-glyph-decompose . ucs-normalize-NFD-region))) (string-glyph-decompose . ucs-normalize-NFD-string)))
(let ((emacs-29-symbol (car sym.replace)) (let ((emacs-29-symbol (car sym.replace))
(previous-implementation (cdr sym.replace))) (previous-implementation (cdr sym.replace)))
(unless (fboundp emacs-29-symbol) (unless (fboundp emacs-29-symbol)