File tree Expand file tree Collapse file tree 2 files changed +4
-3
lines changed
Expand file tree Collapse file tree 2 files changed +4
-3
lines changed Original file line number Diff line number Diff line change @@ -66,7 +66,7 @@ def jsxText : Parser :=
6666 withAntiquot (mkAntiquot "jsxText" `ProofWidgets.Jsx.jsxText) {
6767 fn := fun c s =>
6868 let startPos := s.pos
69- let s := takeWhile1Fn (not ∘ jsxTextForbidden.contains) "expected JSX text" c s
69+ let s := takeWhile1Fn (not ∘ ( fun c => jsxTextForbidden.contains c) ) "expected JSX text" c s
7070 mkNodeToken `ProofWidgets.Jsx.jsxText startPos true c s }
7171
7272def getJsxText : TSyntax ``jsxText → String
@@ -179,7 +179,7 @@ so we have to add the term annotations ourselves. -/
179179partial def delabHtmlText : DelabM (TSyntax ``jsxText) := do
180180 let_expr Html.text e := ← getExpr | failure
181181 let .lit (.strVal s) := e | failure
182- if s.any jsxTextForbidden.contains then
182+ if s.any ( fun (c : Char) => jsxTextForbidden.contains c) then
183183 failure
184184 annotateTermLikeInfo <| mkNode ``jsxText #[mkAtom s]
185185
Original file line number Diff line number Diff line change 1- leanprover/lean4:nightly-2025-11-23
1+ leanprover/lean4-pr-releases:pr-release-11357-ee5f4a9
2+
You can’t perform that action at this time.
0 commit comments