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

More debug logging

Browse Source
This commit is contained in:
Hans Dijkema
2026-04-12 16:25:41 +02:00
parent 7b12f8282f
commit 1b555da445
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
racket-webview.rkt
View File

@@ -259,8 +259,10 @@
(string->symbol (string->symbol
(string-downcase (string-downcase
(substring (bytes->string/utf-8 ext-bytes) 1))))) (substring (bytes->string/utf-8 ext-bytes) 1)))))
(exists? (file-exists? file-to-serve))
) )
(if (file-exists? file-to-serve) (dbg-webview "file to serve: ~a, ext: ~a, file-exists?: ~a" file-to-serve ext exists?)
(if exists?
(response/output (response/output
#:mime-type (string->bytes/utf-8 (mimetype-for-ext ext)) #:mime-type (string->bytes/utf-8 (mimetype-for-ext ext))
#:headers (list (make-sec-header sec-cache)) #:headers (list (make-sec-header sec-cache))