diff options
author | Paul A. Patience <paul@apatience.com> | 2021-07-20 23:36:14 -0400 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2021-07-25 09:38:58 -0700 |
commit | 8bf525344fd85d063360deea5b9d6993f84c73b7 (patch) | |
tree | 70ed7960f1ce474ecbdeecf81e543469dde54693 /tests | |
parent | 72ddfec598ee0d591b8d953555894d20906d61fb (diff) | |
download | txr-8bf525344fd85d063360deea5b9d6993f84c73b7.tar.gz txr-8bf525344fd85d063360deea5b9d6993f84c73b7.tar.bz2 txr-8bf525344fd85d063360deea5b9d6993f84c73b7.zip |
tags: don't escape etag patterns
The first field of each etag definition is referred to in the spec as
the "pattern", but it is supposed to contain literal text, and therefore
no characters within it need be escaped.
* tags.tl (escape): Move above tag definition.
(tag)[pattern]: Rename to...
[line]: ...this.
[text]: Update renamed slot. Escape the line here rather than on
creation.
[etext]: Update renamed slot.
(slot-tag)[text]: Update renamed slot. Escape the line here rather than
on creation.
(orig-tag)[line]: Rename to...
[orig-line]: ...this.
[text]: Update renamed slot.
(get-pos-pat): Rename to...
(get-pos-line): ...this. Don't escape the line when returning it.
(with-tag-shorthand-macro, toplevel): Rename variables and references to
functions in accordance with the above.
Diffstat (limited to 'tests')
0 files changed, 0 insertions, 0 deletions