diff options
| author | Philipp Stephani <phst@google.com> | 2018-01-30 00:05:58 +0100 |
|---|---|---|
| committer | Philipp Stephani <phst@google.com> | 2018-01-30 00:05:58 +0100 |
| commit | 956807bd1fc2d102714282fdfbb8d2a549dc8e17 (patch) | |
| tree | c25306576de9279270ae717a15173b63e577cb66 /lisp/emacs-lisp | |
| parent | 7d90d2ece041630e0c440a2b0216e43f82729844 (diff) | |
| download | emacs-956807bd1fc2d102714282fdfbb8d2a549dc8e17.tar.gz emacs-956807bd1fc2d102714282fdfbb8d2a549dc8e17.tar.bz2 emacs-956807bd1fc2d102714282fdfbb8d2a549dc8e17.zip | |
* lisp/emacs-lisp/rx.el (rx): Fix the definition of 'blank'.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/rx.el | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/rx.el b/lisp/emacs-lisp/rx.el index 37aa25b556d..c4f6d4f70ea 100644 --- a/lisp/emacs-lisp/rx.el +++ b/lisp/emacs-lisp/rx.el @@ -57,7 +57,6 @@ ;; (rx (and line-start (0+ (in "a-z")))) ;; ;; "\n[^ \t]" -;; (rx (and "\n" (not blank))), or ;; (rx (and "\n" (not (any " \t")))) ;; ;; "\\*\\*\\* EOOH \\*\\*\\*\n" @@ -74,9 +73,9 @@ ;; "^content-transfer-encoding:\\(\n?[\t ]\\)*quoted-printable\\(\n?[\t ]\\)*" ;; (rx (and line-start ;; "content-transfer-encoding:" -;; (+ (? ?\n)) blank +;; (+ (? ?\n)) (any " \t") ;; "quoted-printable" -;; (+ (? ?\n)) blank)) +;; (+ (? ?\n)) (any " \t")) ;; ;; (concat "^\\(?:" something-else "\\)") ;; (rx (and line-start (eval something-else))), statically or @@ -962,7 +961,11 @@ CHAR matches 0 through 9, a through f and A through F. `blank' - matches space and tab only. + matches horizontal whitespace, as defined by Annex C of the + Unicode Technical Standard #18. In particular, it matches + spaces, tabs, and other characters whose Unicode + `general-category' property indicates they are spacing + separators. `graphic', `graph' matches graphic characters--everything except whitespace, ASCII |