mirror of
https://github.com/reanimate/reanimate.git
synced 2026-09-10 15:42:21 +00:00
Fix TCP windows issue, fix Firefox on windows.
This commit is contained in:
parent
f320f5cfdf
commit
7003c13bac
4 changed files with 5 additions and 5 deletions
|
|
@ -14,7 +14,7 @@ import qualified Data.Map as Map
|
|||
import qualified Data.Text as T
|
||||
import Network.Socket (AddrInfo (..), AddrInfoFlag (..), SocketOption (..),
|
||||
SocketType (Stream), accept, bind, close, defaultHints,
|
||||
getAddrInfo, gracefulClose, listen, socket,
|
||||
getAddrInfo, listen, socket,
|
||||
setCloseOnExecIfNeeded, setSocketOption, withFdSocket,
|
||||
withSocketsDo)
|
||||
import Network.Socket.ByteString (recv)
|
||||
|
|
@ -105,7 +105,7 @@ daemonReceive parent cb = withSocketsDo $ do
|
|||
["stop"] -> killThread parent
|
||||
[] -> return ()
|
||||
_ -> error $ "Bad message: " ++ inp
|
||||
gracefulClose conn 5000
|
||||
close conn
|
||||
resolve = do
|
||||
let hints = defaultHints {
|
||||
addrFlags = [AI_PASSIVE]
|
||||
|
|
|
|||
|
|
@ -2,7 +2,7 @@
|
|||
|
||||
## Build it
|
||||
```bash
|
||||
cd reanimate/elm-viewer
|
||||
cd reanimate/viewer-elm
|
||||
npm install
|
||||
npm run build
|
||||
npm run minify
|
||||
|
|
|
|||
2
viewer-elm/dist/elm.js
vendored
2
viewer-elm/dist/elm.js
vendored
File diff suppressed because one or more lines are too long
|
|
@ -378,7 +378,7 @@ frameView bestFrame frameIndex frameCount frames showingHelp frameDeltas isPause
|
|||
image =
|
||||
case bestFrame of
|
||||
Just svgUrl ->
|
||||
Html.img [ src svgUrl ] []
|
||||
Html.img [ src ("file://" ++ svgUrl) ] []
|
||||
|
||||
Nothing ->
|
||||
Html.text ""
|
||||
|
|
|
|||
Loading…
Reference in a new issue