Skip to content
Merged
Show file tree
Hide file tree
Changes from 2 commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
1 change: 1 addition & 0 deletions CHANGELOG.md
Original file line number Diff line number Diff line change
Expand Up @@ -9,6 +9,7 @@ Breaking changes:
New features:

Bugfixes:
- Stop loading hang when using query params to show compiled JS output (#296 by @JordanMartinez)

Other improvements:

Expand Down
3 changes: 2 additions & 1 deletion client/src/Try/Container.purs
Original file line number Diff line number Diff line change
Expand Up @@ -183,8 +183,9 @@ component = H.mkComponent

Right res@(Right (CompileSuccess { js, warnings })) -> do
{ settings } <- H.get
if settings.showJs then
if settings.showJs then do
H.liftEffect teardownIFrame
H.modify_ _ { compiled = Just res }
else do
for_ warnings \warnings_ -> do
let anns = Array.mapMaybe (toAnnotation MarkerWarning) warnings_
Expand Down