diff options
| author | K. Handa <handa@gnu.org> | 2015-09-02 18:28:54 +0900 |
|---|---|---|
| committer | K. Handa <handa@gnu.org> | 2015-09-02 18:28:54 +0900 |
| commit | e7b62736aade24620c8ba6fa6bd467d017f16ee0 (patch) | |
| tree | d00a2203437a168b2414c6b73afc00a88d90b4b1 /lisp/obsolete/sregex.el | |
| parent | ae08d073d7e2738580341534adc3c5924dc76860 (diff) | |
| parent | 30866274e21c5f0a1c5f60cfe290743e7d482349 (diff) | |
| download | emacs-e7b62736aade24620c8ba6fa6bd467d017f16ee0.tar.gz emacs-e7b62736aade24620c8ba6fa6bd467d017f16ee0.tar.bz2 emacs-e7b62736aade24620c8ba6fa6bd467d017f16ee0.zip | |
Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs
Diffstat (limited to 'lisp/obsolete/sregex.el')
| -rw-r--r-- | lisp/obsolete/sregex.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/obsolete/sregex.el b/lisp/obsolete/sregex.el index 0a15f50be28..de0b1d913ba 100644 --- a/lisp/obsolete/sregex.el +++ b/lisp/obsolete/sregex.el @@ -262,15 +262,15 @@ This is exactly like `sregexq' (q.v.) except that it evaluates all its arguments, so literal sregex clauses must be quoted. For example: - (sregex '(or \"Bob\" \"Robert\")) => \"Bob\\\\|Robert\" + (sregex \\='(or \"Bob\" \"Robert\")) => \"Bob\\\\|Robert\" An argument-evaluating sregex interpreter lets you reuse sregex subexpressions: - (let ((dotstar '(0+ any)) - (whitespace '(1+ (syntax ?-))) - (digits '(1+ (char (?0 . ?9))))) - (sregex 'bol dotstar \":\" whitespace digits)) => \"^.*:\\\\s-+[0-9]+\"" + (let ((dotstar \\='(0+ any)) + (whitespace \\='(1+ (syntax ?-))) + (digits \\='(1+ (char (?0 . ?9))))) + (sregex \\='bol dotstar \":\" whitespace digits)) => \"^.*:\\\\s-+[0-9]+\"" (sregex--sequence exps nil)) (defmacro sregexq (&rest exps) |