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

Merge branch 'main' of https://git.dijkewijk.nl/hans/simple-ini

Browse Source
This commit is contained in:
Hans Dijkema
2026-07-06 10:33:51 +02:00
parent e2c56e8b82 6a4005c1d8
commit 8343be2a66
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
main.rkt
+2 -2
View File
@@ -91,8 +91,8 @@
(define (file->ini file*) (define (file->ini file*)
(let* ((file (get-ini-file file*)) (let* ((file (get-ini-file file*))
(lines (if (file-exists? file) (file->lines file) '())) (lines (if (file-exists? file) (file->lines file) '()))
(re-section #px"^\\[([a-zA-Z0-9_-]+)\\]$") (re-section #px"^\\[([a-zA-Z0-9_.-]+)\\]$")
(re-keyval #px"^([a-zA-Z0-9_-]+)[=](.*)$") (re-keyval #px"^([a-zA-Z0-9_.-]+)[=](.*)$")
(re-comment #px"^[;](.*)$")) (re-comment #px"^[;](.*)$"))
(letrec ((f (lambda (sections section lines) (letrec ((f (lambda (sections section lines)
(if (null? lines) (if (null? lines)