aboutsummaryrefslogtreecommitdiff
path: root/md.bqn
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-11-19 21:35:29 -0500
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-11-19 21:35:29 -0500
commitd578f20f3a7a7f06d58bd5bc04fd962df4692d0d (patch)
tree3ad6ac2c3b4d321b91e6eadc541933a6dc641971 /md.bqn
parent3fd43be98cb39903a8f6e62d8d2427daee59a2bf (diff)
More ⋈ replacements
Diffstat (limited to 'md.bqn')
-rw-r--r--md.bqn6
1 files changed, 3 insertions, 3 deletions
diff --git a/md.bqn b/md.bqn
index b9dbed33..746ea83a 100644
--- a/md.bqn
+++ b/md.bqn
@@ -207,7 +207,7 @@ Markdown ← {filename𝕊𝕩:
code ← JoinLines 𝕩
# Highlight and unescape html-unsafe characters
- c‿ci ← extensions◶(2⥊<⟨⟩)‿GetHighlights code
+ c‿ci ← extensions◶(⋈˜⟨⟩)‿GetHighlights code
em‿e‿ei ← CharEntities code
# If every line is indented by at least 4 additional spaces, we will
@@ -220,7 +220,7 @@ Markdown ← {filename𝕊𝕩:
g ← 𝕩∊"←↩"
(⊑g⊐1) (<⟜(≠g))◶⟨1,¬(" "∾∾idChars)∧´∘∊˜↑⟩ 𝕩
}
- r‿ri ← addRslt◶(2⥊<⟨⟩)‿{
+ r‿ri ← addRslt◶(⋈˜⟨⟩)‿{
⟨ (ShowRslt ⊣◶⟨"",(⥊∾⟜lf⎉1)∘Fmt∘⊢⟩ CodeExec)⎊("ERROR"∾lf)⍟(0<≠)¨ 𝕩
1 -˜ +` 1 + ≠¨ 𝕩 ⟩ # Don't forget the trailing newline
} 𝕩
@@ -361,7 +361,7 @@ Markdown ← {filename𝕊𝕩:
# If span has both a leading and a trailing space, they are removed.
remSpace ← I2M ⥊ ((1<-˜˝˘)∧·∧˝˘' '=⊏⟜𝕩)⊸/ -⟜0‿1˘ codeBounds
codeMask ∧↩ ¬ remSpace
- ⟨code,codePos⟩ ← codeMask extensions◶(2⥊<⟨⟩)‿GetMultiHighlights 𝕩
+ ⟨code,codePos⟩ ← codeMask extensions◶(⋈˜⟨⟩)‿GetMultiHighlights 𝕩
include ← ¬ remSpace ∨ ≠` I2M ⥊ ctInds
codeBounds ↩ ⥊ -⟜1‿0˘ codeBounds
unused ← actual ∧ include ∧ ¬ codeMask