hans/web-racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Example further and also message box preparation.

Browse Source 
NB. does not work currently with the linux flatpak stuff.

Signed-off-by: Hans Dijkema <hans@dijkewijk.nl>
This commit is contained in:
Hans Dijkema
2025-11-13 16:28:17 +01:00
parent 2aa6db7423
commit f8057fccc5
11 changed files with 217 additions and 51 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
private/webui-wire-ipc.rkt
View File

@@ -34,7 +34,8 @@
(if (and (string? colon) (string=? colon ":") (is-int? str-length))
; process line
(let* ((length (string->number str-length))
(input (read-string length process-stderr))
(input-bytes (read-bytes length process-stderr))
(input (bytes->string/utf-8 input-bytes))
(m (regexp-match re-kind input))
)
(read-eol process-stderr)
@@ -88,7 +89,8 @@
(semaphore-post sem)
(error "Unexpected input from webui-wire executable"))
(let* ((length (string->number str-length))
(input (read-string length process-stdout))
(input-bytes (read-bytes length process-stdout))
(input (bytes->string/utf-8 input-bytes))
)
(read-eol process-stdout)
(semaphore-post sem)