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

Corrected esc-quote and esc-dbl-quote

Browse Source
This commit is contained in:
Hans Dijkema
2026-04-12 12:45:33 +02:00
parent 6566b04606
commit 1365ff08f5
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
private/utils.rkt
View File

@@ -101,10 +101,10 @@
))) )))
(define (esc-quote str) (define (esc-quote str)
(string-replace str "'" "\\'")) (string-replace (string-replace str "\\" "\\\\") "'" "\\'"))
(define (esc-double-quote str) (define (esc-double-quote str)
(string-replace str "\"" "\\\"")) (string-replace (string-replace str "\\" "\\\\") "\"" "\\\""))
(define (fromJson str) (define (fromJson str)
(with-input-from-string str read-json)) (with-input-from-string str read-json))