mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/mail/footnote.el: Avoid regexp-opt-charset, which is not autoloaded.

Browse source 
(footnote-hebrew-numeric-regex): Use rx-to-string instead.
This commit is contained in:
Stefan Monnier 2019-05-09 10:32:25 -04:00
parent eb1698c54a
commit d2bd9958bd
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/mail/footnote.el
View file

@ -348,7 +348,7 @@ Use Unicode characters for footnoting."
(defconst footnote-hebrew-numeric-regex
(let ((numchars (string-to-list
(apply #'concat (apply #'append footnote-hebrew-numeric)))))
(concat (regexp-opt-charset (cons ?' numchars)) "+")))
(rx-to-string `(1+ (in ?' ,@numchars)))))
;; (defconst footnote-hebrew-numeric-regex "\\([אבגדהוזחט]'\\)?\\(ת\\)?\\(ת\\)?\\([קרשת]\\)?\\([טיכלמנסעפצ]\\)?\\([אבגדהוזחט]\\)?")
(defun footnote--hebrew-numeric (n)