diff options
| -rw-r--r-- | lisp/mail/footnote.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/footnote.el b/lisp/mail/footnote.el index 327eda11dc5..a1bbf7369b2 100644 --- a/lisp/mail/footnote.el +++ b/lisp/mail/footnote.el | |||
| @@ -348,7 +348,7 @@ Use Unicode characters for footnoting." | |||
| 348 | (defconst footnote-hebrew-numeric-regex | 348 | (defconst footnote-hebrew-numeric-regex |
| 349 | (let ((numchars (string-to-list | 349 | (let ((numchars (string-to-list |
| 350 | (apply #'concat (apply #'append footnote-hebrew-numeric))))) | 350 | (apply #'concat (apply #'append footnote-hebrew-numeric))))) |
| 351 | (concat (regexp-opt-charset (cons ?' numchars)) "+"))) | 351 | (rx-to-string `(1+ (in ?' ,@numchars))))) |
| 352 | ;; (defconst footnote-hebrew-numeric-regex "\\([אבגדהוזחט]'\\)?\\(ת\\)?\\(ת\\)?\\([קרשת]\\)?\\([טיכלמנסעפצ]\\)?\\([אבגדהוזחט]\\)?") | 352 | ;; (defconst footnote-hebrew-numeric-regex "\\([אבגדהוזחט]'\\)?\\(ת\\)?\\(ת\\)?\\([קרשת]\\)?\\([טיכלמנסעפצ]\\)?\\([אבגדהוזחט]\\)?") |
| 353 | 353 | ||
| 354 | (defun footnote--hebrew-numeric (n) | 354 | (defun footnote--hebrew-numeric (n) |