Merge pull request #88 from vylsaz/render-html-fix

]html domain error fix
Dyalog · Nov 6, 2022 · 421dd51 · 421dd51
2 parents c2afa64 + 27bb892
commit 421dd51
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/dyalog_kernel/Render.dyalog b/dyalog_kernel/Render.dyalog
@@ -128,8 +128,8 @@
           ⍺ If(0∘≡)((⎕NEW ⎕SE.Parser'-type=').Parse⍕'-\w+=\w+'⎕S'&'⊢'''[^'']'''⎕R''⊢⍵).type
       }
       Show←{
-          9∊⎕NC'⍵':(⍕∇ Render)⍵
-          ⍺←⊃'3500⌶'_⍨'<title>(.*)</title>'⎕S'\1'
+          9∊⎕NC'⍵':(⍕∇ Render)⍵   
+          ⍺←⊃'3500⌶',∘⊂⍨'<title>(.*)</title>'⎕S'\1'
           ride:{}(⍺ RideRender⊢)⍵
           Format←Encode(⍺ Document 96∘Shrink)⍣(2∊⎕NC'⍺')
           (#.⎕NEW'HTMLRenderer'_,⊂'HTML'_ Format ⍵).Wait